⟦440721b1b⟧

TextFile

;; From mike@yetti.UUCP Fri Aug 29 12:49:28 1986
;; Path: mit-prep!mit-hermes!mit-eddie!genrad!panda!husc6!seismo!mnetor!yetti!mike
;; From: mike@yetti.UUCP (Mike Clarkson )
;; Newsgroups: net.sources
;; Subject: Gnu Emacs EDT Emulation - Introduction - 1/3
;; Date: 27 Aug 86 23:30:33 GMT
;; Reply-To: mike@yetti.UUCP (Mike Clarkson )
;; Organization: York University Computer Science
;; 
;; Here's my EDT emulation for GNU Emacs that is based on the EDT emulation
;; for Gosling's Emacs sent out on the net a couple of years ago by Lynn Olson
;; at Tektronics.  This emulation was widely distributed as the file edt.ml
;; in the maclib directory of most Emacs distributions.
;;      
;; My emulation consists of two files: edt.el and edtdoc.el.  The edtdoc.el file
;; is the documentation, that you can add to the beginning of edt.el if you
;; want.  I have split them because I have been loading the edt.el file a lot
;; during debugging.
;;      
;; I will gladly take all criticisms and complaints to heart, and will fix
;; what bugs I can find.   As this is my first elisp hack, you may have to
;; root out a few nasties hidden in the code.  Please let me know if you
;; find any (sorry,
;; no rewards :-).  I would also be interested if there are better,
;; cleaner, faster ways of doing some of the things that I have done.
;;      
;; You must understand some design considerations that I had in mind.
;; The intention was not really to "emulate" EDT, but rather to take advantage
;; of the years of EDT experience that had accumulated in my right hand,
;; while at the same time taking advantage of EMACS.
;;      
;; Some major differences are:
;;      
;; HELP            is describe-key;
;; GOLD/HELP       is describe-function;
;; FIND            is isearch-forward/backward;
;; GOLD/HELP       is occur-menu, which finds all occurrences of a search string;
;; ENTER           is other-window;
;; SUBS            is subprocess-command.  Note that you will have to change this
;;                 yourself to shell if you are running Un*x;
;; PAGE            is next-paragraph, because that's more useful than page.
;; SPECINS         is copy-to-killring;
;; GOLD/GOLD       is mark-section-wisely, which is my command to mark the
;;                 section in a manner consistent with the major-mode.  It
;;                 uses mark-defun for emacs-lisp, lisp, mark-c-function for C,
;;                 and mark-paragraph for other modes.
;;      
;;      
;; Some subtle differences are:
;;      
;; APPEND          is append-to-buffer.  One doesn't append to the kill ring much
;;                 and SPECINS is now copy-to-killring;
;; REPLACE         is replace-regexp;
;; FILL            is fill-region-wisely, which uses indent-region for C, lisp
;;                 emacs-lisp, and fill-region for others. It asks if you really
;;                 want to fill-region in TeX-mode, because I find this to be
;;                 very dangerous.
;; CHNGCASE        is case-flip for the character under the cursor only.
;;                 I felt that case-flip region is unlikely, as usually you
;;                 upcase-region or downcase region.  Also, unlike EDT it
;;                 is independent of the direction you are going, as that
;;                 drives me nuts.
;;      
;; I use Emacs definition of what a word is.  This is considerably different from
;; what EDT thinks a word is.  This is not good for dyed-in-the-wool EDT fans,
;; but is probably preferable for experienced Emacs users.  My assumption is that
;; the former are a dying breed now that GNU Emacs has made it to VMS, but let me
;; know how you feel.  Also, when you undelete a word it leave the point at the
;; end of the undeleted text, rather than the beginning.  I might change this
;; as I'm not sure if I like this or not. I'm also not sure if I want it to
;; set the mark each time you delete a character or word.
;;      
;; Backspace does not invoke beginning-of-line, because ^H is the help prefix,
;; and I felt it should be left as such.  You can change this if you like.
;;      
;; The ADVANCE and BACKUP keys do not work as terminators for forward or
;; backward searches. In Emacs, all search strings are terminated by return.
;; The searches will however go forward or backward depending on your current
;; direction.  Also, when you change directions, the mode line will not be
;; updated immediately, but only when you next execute an emacs function.
;; Personally, I consider this to be a bug, not a feature.
;;      
;; This should also work with VT-2xx's, though I haven't tested it extensively
;; on those terminals.  It assumes that the CSI-map of vt_200.el has been defined.
;;      
;; There are also a whole bunch of GOLD letter, and GOLD character bindings:
;; look at edtdoc.el for them, or better still, look at the edt.el lisp code,
;; because after all, in the true Lisp tradition, the source code is *assumed*
;; to be self-documenting :-)
;;      
;; Mike Clarkson,            ...!allegra \             BITNET:  mike@YUYETTI or
;; CRESS, York University,   ...!decvax   \                 SYMALG@YUSOL
;; 4700 Keele Street,        ...!ihnp4     > !utzoo!yetti!mike
;; North York, Ontario,      ...!linus    /
;; CANADA M3J 1P3.           ...!watmath /      Phone: +1 (416) 736-2100 x 7767
;;      
;; Note that I am not on ARPA, and must gateway any ARPA mail through BITNET or
;; UUCP.  If you have a UUCP or BITNET address please use it for communication
;; so that I can reach you directly.  If you have both, the BITNET address
;; is preferred.
;; -- 
;; Mike Clarkson,		  ...!allegra \		BITNET:	mike@YUYETTI or
;; CRESS, York University,	  ...!decvax   \		SYMALG@YUSOL
;; 4700 Keele Street,	  ...!ihnp4     > !utzoo!yetti!mike
;; North York, Ontario,	  ...!linus    /		     
;; CANADA M3J 1P3.		  ...!watmath /	Phone: +1 (416) 737-2100 x 7767
DataMuseum.dk

DKUUG/EUUG Conference tapes

⟦440721b1b⟧ TextFile

Derivation

TextFile
