| 1 | ;;;
|
|---|
| 2 | ;;; ELLE Default Command Profile - "defprf.e"
|
|---|
| 3 | ;;;
|
|---|
| 4 | ;;; This file is input to the ellec program. It defines the default
|
|---|
| 5 | ;;; command key bindings that ELLE uses, in the absence of an individual
|
|---|
| 6 | ;;; user profile.
|
|---|
| 7 | ;;; These defaults attempt to emulate the default EMACS command key
|
|---|
| 8 | ;;; bindings. Differences, where known, are commented.
|
|---|
| 9 | ;;;
|
|---|
| 10 | ;;; "ELLE" means the function is unique to ELLE.
|
|---|
| 11 | ;;; E/G: (cmd altnam) "thisname";
|
|---|
| 12 | ;;; "E:" refers to TOPS-20 EMACS, "G:" refers to Gnu Emacs.
|
|---|
| 13 | ;;; (cmd) This function exists but is bound to "cmd" instead.
|
|---|
| 14 | ;;; (*) function exists but is not bound to any specific key.
|
|---|
| 15 | ;;; () function does not exist.
|
|---|
| 16 | ;;; (=) function exists, with same binding (normally omitted)
|
|---|
| 17 | ;;; altnam Name by which this function is known.
|
|---|
| 18 | ;;; "thisname" - name of function bound to this command.
|
|---|
| 19 | ;;; - means the command is unbound (undefined).
|
|---|
| 20 |
|
|---|
| 21 | (keyallunbind) ; Flush any predefined bindings
|
|---|
| 22 |
|
|---|
| 23 | (keybind ^@ "Set/Pop Mark")
|
|---|
| 24 | (keybind ^A "Beginning of Line")
|
|---|
| 25 | (keybind ^B "Backward Character")
|
|---|
| 26 | ; ^C not bound. ; E: ()- G: mode-specific-command-prefix
|
|---|
| 27 | (keybind ^D "Delete Character")
|
|---|
| 28 | (keybind ^E "End of Line")
|
|---|
| 29 | (keybind ^F "Forward Character")
|
|---|
| 30 | (keybind ^H "Backward Character") ; G: (^B) help-command
|
|---|
| 31 | (keybind ^I "Indent According to Mode")
|
|---|
| 32 | (keybind ^J "Indent New Line")
|
|---|
| 33 | (keybind ^K "Kill Line")
|
|---|
| 34 | (keybind ^L "New Window")
|
|---|
| 35 | (keybind ^M "CRLF")
|
|---|
| 36 | (keybind ^N "Down Real Line")
|
|---|
| 37 | (keybind ^O "Open Line")
|
|---|
| 38 | (keybind ^P "Up Real Line")
|
|---|
| 39 | (keybind ^Q "Quoted Insert")
|
|---|
| 40 | (keybind ^R "Reverse Search")
|
|---|
| 41 | (keybind ^S "Incremental Search")
|
|---|
| 42 | (keybind ^T "Transpose Characters")
|
|---|
| 43 | (keybind ^U "Universal Arg")
|
|---|
| 44 | (keybind ^V "Next Screen")
|
|---|
| 45 | (keybind ^W "Kill Region")
|
|---|
| 46 | (keybind ^X "Prefix Extend")
|
|---|
| 47 | (keybind ^Y "Un-kill")
|
|---|
| 48 | ; ^Z not bound ; E: Prefix Control-Meta; G: suspend-emacs
|
|---|
| 49 | (keybind ^[ "Prefix Meta")
|
|---|
| 50 | (keybind "^\" "Debug Mode") ; ELLE. E: () Prefix Meta; G: () -
|
|---|
| 51 | ; ^] not bound. ; E+G: Abort Recursive Edit
|
|---|
| 52 | (keybind ^^ "Hit Breakpoint") ; ELLE. E: () Prefix Control; G: () -
|
|---|
| 53 | (keybind ^_ "Describe") ; E: (M-?) Help; G: (^H-k) undo
|
|---|
| 54 | (keybind " " "Insert Self")
|
|---|
| 55 | (keybind ! "Insert Self")
|
|---|
| 56 | (keybind """" "Insert Self")
|
|---|
| 57 | (keybind # "Insert Self")
|
|---|
| 58 | (keybind $ "Insert Self")
|
|---|
| 59 | (keybind % "Insert Self")
|
|---|
| 60 | (keybind & "Insert Self")
|
|---|
| 61 | (keybind ' "Insert Self")
|
|---|
| 62 | (keybind "(" "Insert Self")
|
|---|
| 63 | (keybind ")" "Insert Self")
|
|---|
| 64 | (keybind * "Insert Self")
|
|---|
| 65 | (keybind + "Insert Self")
|
|---|
| 66 | (keybind , "Insert Self")
|
|---|
| 67 | (keybind - "Insert Self")
|
|---|
| 68 | (keybind . "Insert Self")
|
|---|
| 69 | (keybind / "Insert Self")
|
|---|
| 70 | (keybind 0 "Insert Self")
|
|---|
| 71 | (keybind 1 "Insert Self")
|
|---|
| 72 | (keybind 2 "Insert Self")
|
|---|
| 73 | (keybind 3 "Insert Self")
|
|---|
| 74 | (keybind 4 "Insert Self")
|
|---|
| 75 | (keybind 5 "Insert Self")
|
|---|
| 76 | (keybind 6 "Insert Self")
|
|---|
| 77 | (keybind 7 "Insert Self")
|
|---|
| 78 | (keybind 8 "Insert Self")
|
|---|
| 79 | (keybind 9 "Insert Self")
|
|---|
| 80 | (keybind : "Insert Self")
|
|---|
| 81 | (keybind ";" "Insert Self")
|
|---|
| 82 | (keybind < "Insert Self")
|
|---|
| 83 | (keybind = "Insert Self")
|
|---|
| 84 | (keybind > "Insert Self")
|
|---|
| 85 | (keybind ? "Insert Self")
|
|---|
| 86 | (keybind @ "Insert Self")
|
|---|
| 87 | (keybind A "Insert Self")
|
|---|
| 88 | (keybind B "Insert Self")
|
|---|
| 89 | (keybind C "Insert Self")
|
|---|
| 90 | (keybind D "Insert Self")
|
|---|
| 91 | (keybind E "Insert Self")
|
|---|
| 92 | (keybind F "Insert Self")
|
|---|
| 93 | (keybind G "Insert Self")
|
|---|
| 94 | (keybind H "Insert Self")
|
|---|
| 95 | (keybind I "Insert Self")
|
|---|
| 96 | (keybind J "Insert Self")
|
|---|
| 97 | (keybind K "Insert Self")
|
|---|
| 98 | (keybind L "Insert Self")
|
|---|
| 99 | (keybind M "Insert Self")
|
|---|
| 100 | (keybind N "Insert Self")
|
|---|
| 101 | (keybind O "Insert Self")
|
|---|
| 102 | (keybind P "Insert Self")
|
|---|
| 103 | (keybind Q "Insert Self")
|
|---|
| 104 | (keybind R "Insert Self")
|
|---|
| 105 | (keybind S "Insert Self")
|
|---|
| 106 | (keybind T "Insert Self")
|
|---|
| 107 | (keybind U "Insert Self")
|
|---|
| 108 | (keybind V "Insert Self")
|
|---|
| 109 | (keybind W "Insert Self")
|
|---|
| 110 | (keybind X "Insert Self")
|
|---|
| 111 | (keybind Y "Insert Self")
|
|---|
| 112 | (keybind Z "Insert Self")
|
|---|
| 113 | (keybind [ "Insert Self")
|
|---|
| 114 | (keybind "\" "Insert Self")
|
|---|
| 115 | (keybind ] "Insert Self")
|
|---|
| 116 | (keybind ^ "Insert Self")
|
|---|
| 117 | (keybind _ "Insert Self")
|
|---|
| 118 | (keybind ` "Insert Self")
|
|---|
| 119 | (keybind a "Insert Self")
|
|---|
| 120 | (keybind b "Insert Self")
|
|---|
| 121 | (keybind c "Insert Self")
|
|---|
| 122 | (keybind d "Insert Self")
|
|---|
| 123 | (keybind e "Insert Self")
|
|---|
| 124 | (keybind f "Insert Self")
|
|---|
| 125 | (keybind g "Insert Self")
|
|---|
| 126 | (keybind h "Insert Self")
|
|---|
| 127 | (keybind i "Insert Self")
|
|---|
| 128 | (keybind j "Insert Self")
|
|---|
| 129 | (keybind k "Insert Self")
|
|---|
| 130 | (keybind l "Insert Self")
|
|---|
| 131 | (keybind m "Insert Self")
|
|---|
| 132 | (keybind n "Insert Self")
|
|---|
| 133 | (keybind o "Insert Self")
|
|---|
| 134 | (keybind p "Insert Self")
|
|---|
| 135 | (keybind q "Insert Self")
|
|---|
| 136 | (keybind r "Insert Self")
|
|---|
| 137 | (keybind s "Insert Self")
|
|---|
| 138 | (keybind t "Insert Self")
|
|---|
| 139 | (keybind u "Insert Self")
|
|---|
| 140 | (keybind v "Insert Self")
|
|---|
| 141 | (keybind w "Insert Self")
|
|---|
| 142 | (keybind x "Insert Self")
|
|---|
| 143 | (keybind y "Insert Self")
|
|---|
| 144 | (keybind z "Insert Self")
|
|---|
| 145 | (keybind { "Insert Self")
|
|---|
| 146 | (keybind | "Insert Self")
|
|---|
| 147 | (keybind } "Insert Self")
|
|---|
| 148 | (keybind ~ "Insert Self")
|
|---|
| 149 | (keybind DEL "Backward Delete Character")
|
|---|
| 150 |
|
|---|
| 151 | ; Meta chars
|
|---|
| 152 |
|
|---|
| 153 | (keybind M-^B "Move to Window Bottom") ; ELLE (ima). E+G:()-
|
|---|
| 154 | (keybind M-^L "Goto Line") ; E:(); G:(* goto-line) -
|
|---|
| 155 | (keybind M-^N "Scroll Window Down") ; ELLE (ima). E+G:()- forward-list
|
|---|
| 156 | (keybind M-^P "Scroll Window Up") ; ELLE (ima). E+G:()- backward-list
|
|---|
| 157 | (keybind M-^R "Reverse String Search") ; E:(*); G:(* search-backward) -
|
|---|
| 158 | (keybind M-^S "String Search") ; E:(*); G:(* search-forward) isearch-forward-regexp
|
|---|
| 159 | (keybind M-^T "Move to Window Top") ; ELLE (ima). E+G:()-
|
|---|
| 160 | (keybind M-^W "Append Next Kill")
|
|---|
| 161 | (keybind M-^X "Select Existing Buffer") ; ELLE (ima). E+G:()-
|
|---|
| 162 | (keybind M-^^ "Shrink Window") ; ELLE (ima). E+G:()-
|
|---|
| 163 | (keybind M-% "Query Replace")
|
|---|
| 164 | (keybind M-- "Negative Argument")
|
|---|
| 165 | (keybind M-0 "Argument Digit")
|
|---|
| 166 | (keybind M-1 "Argument Digit")
|
|---|
| 167 | (keybind M-2 "Argument Digit")
|
|---|
| 168 | (keybind M-3 "Argument Digit")
|
|---|
| 169 | (keybind M-4 "Argument Digit")
|
|---|
| 170 | (keybind M-5 "Argument Digit")
|
|---|
| 171 | (keybind M-6 "Argument Digit")
|
|---|
| 172 | (keybind M-7 "Argument Digit")
|
|---|
| 173 | (keybind M-8 "Argument Digit")
|
|---|
| 174 | (keybind M-9 "Argument Digit")
|
|---|
| 175 | (keybind "M-;" "Indent for Comment")
|
|---|
| 176 | (keybind M-< "Goto Beginning")
|
|---|
| 177 | (keybind M-> "Goto End")
|
|---|
| 178 | (keybind M-[ "Backward Paragraph")
|
|---|
| 179 | (keybind "M-\" "Delete Horizontal Space")
|
|---|
| 180 | (keybind M-] "Forward Paragraph")
|
|---|
| 181 | (keybind M-B "Backward Word")
|
|---|
| 182 | (keybind M-C "Uppercase Initial")
|
|---|
| 183 | (keybind M-D "Kill Word")
|
|---|
| 184 | (keybind M-F "Forward Word")
|
|---|
| 185 | (keybind M-G "Fill Region")
|
|---|
| 186 | (keybind M-H "Mark Paragraph")
|
|---|
| 187 | (keybind M-I "Indent Relative") ; E+G: (*) Tab to Tab Stop
|
|---|
| 188 | (keybind M-L "Lowercase Word")
|
|---|
| 189 | (keybind M-M "Back to Indentation")
|
|---|
| 190 | (keybind M-N "Next Line") ; E:(*); G:(* forward-line) -
|
|---|
| 191 | (keybind M-O "VT100 button hack") ; ELLE. E+G: () -
|
|---|
| 192 | (keybind M-P "Previous Line") ; E:(*); G:() -
|
|---|
| 193 | (keybind M-Q "Fill Paragraph")
|
|---|
| 194 | (keybind M-T "Transpose Words")
|
|---|
| 195 | (keybind M-U "Uppercase Word")
|
|---|
| 196 | (keybind M-V "Previous Screen")
|
|---|
| 197 | (keybind M-W "Copy Region")
|
|---|
| 198 | (keybind M-Y "Un-kill Pop")
|
|---|
| 199 | (keybind M-~ "Buffer Not Modified")
|
|---|
| 200 | (keybind M-DEL "Backward Kill Word")
|
|---|
| 201 |
|
|---|
| 202 | ; Extended commands
|
|---|
| 203 |
|
|---|
| 204 | (keybind X-^B "List Buffers")
|
|---|
| 205 | (keybind X-^C "Write File Exit") ; ELLE (ima). E:()-; G: (= save-buffers-kill-emacs)
|
|---|
| 206 | (keybind X-^E "Write Region") ; E:(*)-; G:(*) eval-last-sexp
|
|---|
| 207 | (keybind X-^F "Find File")
|
|---|
| 208 | (keybind X-^K "Write Last Kill") ; ELLE (mnx). E+G:()-
|
|---|
| 209 | (keybind X-^L "Lowercase Region")
|
|---|
| 210 | (keybind X-^M "EOL CRLF Mode") ; ELLE. E+G: ()-
|
|---|
| 211 | (keybind X-^O "Delete Blank Lines")
|
|---|
| 212 | (keybind X-^P "Set Profile") ; ELLE. E+G: () Mark Page
|
|---|
| 213 | (keybind X-^R "Read File")
|
|---|
| 214 | (keybind X-^S "Save File")
|
|---|
| 215 | (keybind X-^U "Uppercase Region")
|
|---|
| 216 | (keybind X-^V "Visit File")
|
|---|
| 217 | (keybind X-^W "Write File")
|
|---|
| 218 | (keybind X-^X "Exchange Point and Mark")
|
|---|
| 219 | (keybind X-^Z "Return to Superior") ; G:() suspend-emacs
|
|---|
| 220 | (keybind X-! "Push to Inferior") ; ELLE. E:(*)-; G:()-
|
|---|
| 221 | (keybind X-$ "Replace in Line") ; ELLE (mnx). E+G:()-
|
|---|
| 222 | (keybind X-% "Replace String") ; E+G: (*) -
|
|---|
| 223 | (keybind "X-(" "Start Kbd Macro")
|
|---|
| 224 | (keybind "X-)" "End Kbd Macro")
|
|---|
| 225 | (keybind X-* "View Kbd Macro") ; E: (*)-; G: ()-
|
|---|
| 226 | (keybind X-. "Set Fill Prefix")
|
|---|
| 227 | (keybind X-0 "Delete Window") ; E: ()-
|
|---|
| 228 | (keybind X-1 "One Window")
|
|---|
| 229 | (keybind X-2 "Two Windows")
|
|---|
| 230 | (keybind X-8 "Standout Window") ; ELLE. E+G:()-
|
|---|
| 231 | (keybind X-9 "Two Mode Windows") ; ELLE. E+G:()-
|
|---|
| 232 | (keybind X-= "What Page") ; E+G: (*) What Cursor Position
|
|---|
| 233 | (keybind X-^ "Grow Window")
|
|---|
| 234 | (keybind X-B "Select Buffer")
|
|---|
| 235 | (keybind X-E "Execute Kbd Macro")
|
|---|
| 236 | (keybind X-F "Set Fill Column")
|
|---|
| 237 | (keybind X-I "Insert File") ; E: (*) Info
|
|---|
| 238 | (keybind X-K "Kill Buffer")
|
|---|
| 239 | (keybind X-O "Other Window")
|
|---|
| 240 | (keybind X-S "Save All Files") ; E:(*)-; G:(= save-some-buffers)
|
|---|
| 241 | (keybind X-T "Auto Fill Mode") ; E:(*) Transpose Regions; G:(*)-
|
|---|
| 242 | (keybind X-DEL "Backward Kill Line") ; ELLE(ico) E+G:() Backward Kill Sentence
|
|---|
| 243 | |
|---|
| 244 |
|
|---|
| 245 | ; IMAGEN-specific functions, not bound.
|
|---|
| 246 | ;(keybind "" "Text Mode") ; IMAGEN E:(*); G:(*)
|
|---|
| 247 | ;(keybind "" "Execute Unix Command") ; IMAGEN E:(); G:(M-! shell-command)
|
|---|
| 248 | ;(keybind "" "Execute Make") ; IMAGEN E:(* Compile); G:(* compile)
|
|---|
| 249 | ;(keybind "" "Find Next Error") ; IMAGEN E:(); G:(X-` next-error)
|
|---|
| 250 |
|
|---|
| 251 | ; SUN Mouse functions, for menuitem selection.
|
|---|
| 252 | ;(menuitem "Stuff Selection") ; SUN
|
|---|
| 253 | ;(menuitem "Select Region") ; SUN
|
|---|
| 254 |
|
|---|
| 255 | ; Forget completely about these.
|
|---|
| 256 | ;(keybind "" "ICO Extend Command") ; ICONOGRAPHICS
|
|---|
| 257 | ;(keybind "" "ICO Typeset Funs") ; ICONOGRAPHICS
|
|---|
| 258 | ;(keybind "" "ICO Spec Input Funs") ; ICONOGRAPHICS
|
|---|
| 259 |
|
|---|
