(sun-raw-prefix): Make this just a variable, not a function name.

f3783bef · Richard M. Stallman · ad8f07cd · f3783bef
Commit f3783bef authored Nov 15, 1993 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

lisp/term/sun.el lisp/term/sun.el +2 -2

No files found.
--- a/lisp/term/sun.el
+++ b/lisp/term/sun.el
@@ -98,8 +98,8 @@
 (defvar sun-esc-bracket nil
  "*If non-nil, rebind ESC [ as prefix for Sun function keys.")

-(define-prefix-command 'sun-raw-prefix)
-(define-key function-key-map "\e[" 'sun-raw-prefix)
+(defvar sun-raw-prefix (make-sparse-keymap))
+(define-key function-key-map "\e[" sun-raw-prefix)

 (define-key sun-raw-prefix "210z" [r3])
 (define-key sun-raw-prefix "213z" [r6])