diff options
| author | Jim Blandy <jimb@redhat.com> | 1993-01-26 01:58:16 +0000 |
|---|---|---|
| committer | Jim Blandy <jimb@redhat.com> | 1993-01-26 01:58:16 +0000 |
| commit | dbc4e1c12940079cad7b24e1654a0badcda8d6fc (patch) | |
| tree | e0fbea5b15bd13d2839c8b59b624cec80f31bfd8 /lisp/progmodes/fortran.el | |
| parent | 72766144811cd7258b2a59e56f6e3657537ea508 (diff) | |
| download | emacs-dbc4e1c12940079cad7b24e1654a0badcda8d6fc.tar.gz emacs-dbc4e1c12940079cad7b24e1654a0badcda8d6fc.tar.bz2 emacs-dbc4e1c12940079cad7b24e1654a0badcda8d6fc.zip | |
JimB's changes since January 18th
Diffstat (limited to 'lisp/progmodes/fortran.el')
| -rw-r--r-- | lisp/progmodes/fortran.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el index 96addc99e42..5a0aa4511f8 100644 --- a/lisp/progmodes/fortran.el +++ b/lisp/progmodes/fortran.el @@ -39,7 +39,7 @@ ;;; This file may be used with GNU Emacs version 18.xx if the following ;;; variable and function substutions are made. ;;; Replace: -;;; unread-command-event with unread-command-char +;;; unread-command-events with unread-command-char ;;; frame-width with screen-width ;;; auto-fill-function with auto-fill-hook @@ -469,7 +469,7 @@ Any other key combination is executed normally." (if (or (= (setq c (read-char)) ??) ;insert char if not equal to `?' (= c help-char)) (fortran-abbrev-help) - (setq unread-command-event c)))) + (setq unread-command-events (list c))))) (defun fortran-abbrev-help () "List the currently defined abbrevs in Fortran mode." @@ -535,7 +535,7 @@ See also `fortran-window-create'." (progn (message "Type SPC to continue editing.") (let ((char (read-char))) (or (equal char (string-to-char " ")) - (setq unread-command-event char)))))) + (setq unread-command-events (list char))))))) (fortran-window-create))) (defun fortran-split-line () |