;ELC ;;; compiled by cthomp@willow on Mon Aug 9 12:20:19 1993 ;;; from file /era/era-0.80/editor/lisp/prim/misc.el ;;; emacs version 19.8 (beta6) Lucid. ;;; bytecomp version 2.15; 14-jul-93. ;;; optimization is on. ;;; this file uses opcodes which do not exist in Emacs 18. (if (and (boundp 'emacs-version) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19"))) (error "This file was compiled for Emacs 19.")) (fset 'copy-from-above-command #[(&optional arg) "iy!x !\n\n!d iWhU i Z^\" i Z^Z!\n``) `\\^{P)\nc+" [nil "" string n cc 0 backward-char 1 " \n" move-to-column arg prefix-numeric-value 9 make-string 32] 5 "\ Copy characters from previous nonblank line, starting just above point. Copy ARG characters, but not past the end of that line. If no argument given, copy the entire rest of the line. The characters copied are inserted in the buffer before point." "P"])