[comp.emacs] .emacspro to emulate Unipress emacs

pat@ctycal.UUCP (Patrick Woo) (06/14/91)

I am going through a growing pain of moving from Unipress Emacs to GNU
emacs. Can someone out there send me a .emacspro (or is it .emacsrc ?)
that will make gmacs emulate Unipress Emacs (in terms of keybinding).

Thanks in advance
-- 
  Patrick Woo                  pat%ctycal@cpsc.ucalgary.ca
  Land Information Services                 or
  The City of Calgary       ...{alberta,ubc-cs,uunet}!calgary!ctycal!pat

khera@cs.duke.edu (Vivek Khera) (06/14/91)

In article <660@ctycal.UUCP> pat@ctycal.UUCP (Patrick Woo) writes:

   I am going through a growing pain of moving from Unipress Emacs to GNU
   emacs. Can someone out there send me a .emacspro (or is it .emacsrc ?)
   that will make gmacs emulate Unipress Emacs (in terms of keybinding).

i went through this about three years ago.  i don't think i'll ever go
back.  anyway, i still use the Unipress/Gosling key bindings.  here's
how to do it.  put the following lines in your .emacs (that's the name
you were looking for) file.  these are excerpts from my .emacs file,
so they should work ;-)


(set-gosmacs-bindings)
; fix some messed-up ideas about gosmacs key-bindings and functions
(defun save-and-exit ()
  "Passing a true arg to save-buffers-kill-emacs will cause it not to ask
about each buffer, the way it is in gosling emacs."
  (interactive nil)
  (save-buffers-kill-emacs t))

(defun gosmacs-transpose-chars ()
  "The real way to transpose characters with ^T: always transpose the previous
two characters from where the point is."
  (interactive nil)
  (forward-char -1)
  (transpose-chars 1))

(defun my-next-line (arg)
  "Identical to next-line except it does not insert additional lines at the
end of the buffer, which is an absolutely stupid thing to do."
  (interactive "p")
  (if (not (eobp))
      (next-line arg)
    (progn
      (beep)
      (message "End of buffer."))))

(define-key ctl-x-map "\C-f" 'find-file)
(define-key global-map "\eh" 'backward-kill-word)
(define-key global-map "\C-n" 'my-next-line)
(define-key global-map "\C-t" 'gosmacs-transpose-chars)

; redefine help character to be ESC-?
(define-key global-map "\e?" 'help-command)
; and define backspace to do the right thing.
(define-key global-map "\C-h" 'delete-backward-char)

--
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
Vick Khera, Gradual Student/Systems Guy   Department of Computer Science
ARPA:   khera@cs.duke.edu                 Duke University
UUCP:   ...!mcnc!duke!khera               Durham, NC 27706     (919) 660-6528

gamin@ireq-robot.hydro.qc.ca (Martin Boyer) (06/15/91)

khera@cs.duke.edu (Vivek Khera) writes:

   In article <660@ctycal.UUCP> pat@ctycal.UUCP (Patrick Woo) writes:

      I am going through a growing pain of moving from Unipress Emacs to GNU
      emacs. Can someone out there send me a .emacspro (or is it .emacsrc ?)
      that will make gmacs emulate Unipress Emacs (in terms of keybinding).

   i went through this about three years ago.  i don't think i'll ever go
   back.  anyway, i still use the Unipress/Gosling key bindings. [...]

I switched to GNU a year and a half ago, after 5 years of intensive
use of UniPress.  It *is* a pain to switch, but it took me about a
month to forget the old bindings.  I strongly recommend learning the
new bindings unless you're willing (and good enough in elisp) to
modify every new package you get from the net.  The "standard" GNU
bindings are known by many "non-standard" packages and used to speed
up learning.  Moreover, there is (most of the time) a rationale behind
the construction of the GNU bindings.

An example:

DEL: delete character
M-DEL: delete word

I find ESC-DEL more intuitive than ESC-h (the UniPress way), because I
never used ^H to delete, I always used the DELETE key.

^H means 'help' in GNU.  Once you've figured out that BACKSPACE
doesn't mean DELETE, it's easy.  Easier than remembering whatever was
the help key in UniPress (Control-underscore, wasn't it?).

(Please, no flames about the BACKSPACE/DELETE key usage; it has been
debated to death).

--
Martin Boyer                            mboyer@ireq-robot.hydro.qc.ca
Institut de recherche d'Hydro-Quebec    mboyer@ireq-robot.uucp
Varennes, QC, Canada   J3X 1S1
+1 514 652-8412