home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #30 / NN_1992_30.iso / spool / gnu / emacs / help / 5127 < prev    next >
Encoding:
Internet Message Format  |  1992-12-21  |  3.4 KB
  1. Path: sparky!uunet!charon.amdahl.com!amdahl!JUTS!climb!tlp00
  2. From: tlp00@ras.amdahl.com (Tibor Polgar)
  3. Newsgroups: gnu.emacs.help
  4. Subject: Re: Looking for .el for Sparcstation
  5. Message-ID: <9esJ02nA2fC801@JUTS.ccc.amdahl.com>
  6. Date: 19 Dec 92 02:06:14 GMT
  7. References: <1992Dec18.220911.17223@convex.com>
  8. Sender: netnews@ccc.amdahl.com
  9. Reply-To: tlp00@ras.amdahl.com
  10. Organization: Amdahl Corporation, Sunnyvale CA
  11. Lines: 59
  12.  
  13. Here is a key binding setup for mod 5 keyboard(? could be mod 4)
  14.  
  15. Note that i'm an lemacs user and haven't used this setup in a while.... Also doing a
  16. C-h b may crash (think its only in lemacs) because it dies on some of my quoted 
  17. string bindings.
  18.  
  19.  
  20. (global-set-key "\e[" nil)
  21.  
  22. (global-set-key "\e[224z" 'overwrite-mode)             ; PF1 toggle overwrite
  23. (global-set-key "\e[225z" 'split-window-vertically)    ; PF2 split screen
  24. (global-set-key "\e[226z" 'save-some-buffers)           ; PF3 end
  25. (global-set-key "\e[227z" 'isearch-forward)             ; PF4 ??
  26. (global-set-key "\e[228z" "\C-u3\C-l")                  ; PF5 cur to top+3
  27. (global-set-key "\e[229z" 'split-line)                ; PF6 split line
  28. (global-set-key "\e[230z" "\ev")            ; PF7 -50%
  29. (global-set-key "\e[231z" "\C-v")            ; PF8 +50%
  30. (global-set-key "\e[232z" "\C-e\C-d ")            ; PF9 join
  31. (global-set-key "\e[-1z"  "\C-u1\ev")                 ; PF10 scroll down
  32. (global-set-key "\e[192z" "\C-u1\C-v")           ; PF11 scroll up 
  33. (global-set-key "\e[193z" "\C-e")            ; PF12 end-of-line
  34.  
  35. (global-set-key "\e[208z" 'bury-buffer)                    ; R1 Display buffer
  36. (global-set-key "\e[209z" "\C-x0")            ; R2 delete buffer
  37. (global-set-key "\e[210z" "\C-x\C-s\C-xk")              ; R3 kill buffer
  38. (global-set-key "\e[211z" 'query-replace-regexp)        ; R4 query replace
  39. (global-set-key "\e[212z" 'replace-regexp)            ; R5 replace
  40. (global-set-key "\e[213z" 'isearch-forward)          ; R6 reg exp replace
  41. (global-set-key "\e[214z" "\e<")            ; R7 HOME 
  42. ;;(global-set-key "\e[215z" "")                        ; R8 cursor up 1
  43. (global-set-key "\e[216z" 'scroll-down)            ; R9 PgUp
  44. ;;(global-set-key "\e[217z" "")                    ; R10 cursor left 1
  45. (global-set-key "\e[218z" 'recenter)            ; R11 Center 
  46. ;;(global-set-key "\e[19z"  "")                        ; R12 cursor right 1
  47. (global-set-key "\e[220z" "\e>")            ; R13 END
  48. ;;(global-set-key "\e[221z" "")                    ; R14 cursor down 1
  49. (global-set-key "\e[222z" 'scroll-up)            ; R15 PgDn
  50.  
  51. ;;(define-key esc-map "OP" 'goto-line )        ; L1
  52.  
  53. (global-set-key "\e[194z" 'repeat-complex-command)      ; L3 last cmd
  54. (global-set-key "\e[195z" 'undo)                    ; L4 Undo
  55. (global-set-key "\e[196z" 'previous-complex-command)    ; L5 previous command
  56. (global-set-key "\e[197z" 'copy-region-as-kill)           ; L6 Copy
  57. (global-set-key "\e[198z" 'yank-pop)                       ; L7 Back Paste
  58. (global-set-key "\e[199z" 'yank)                    ; L8 Paste
  59. (global-set-key "\e[200z" 'isearch-forward-regexp)      ; L9 forward search
  60. (global-set-key "\e[201z" 'kill-region)                      ; L10 Cut
  61.  
  62. -------------------------------------------------------------------------------
  63. | Tibor L. Polgar    |  (408) 746-8649     | tlp00@climb.ras.amdahl.com
  64. | Amdahl Corporation
  65. | 1250 East Arques Avenue (M/S 281)
  66. | P.O. Box 3470
  67. | Sunnyvale, CA 94088-3470
  68. |
  69. | The opinions expressed above are mine, solely, and do not in any way
  70. | shape or form reflect the opinions or policies of Amdahl Corp.
  71. -------------------------------------------------------------------------------
  72.