diff options
| author | Glenn Morris <[email protected]> | 2003-04-12 15:44:59 +0000 |
|---|---|---|
| committer | Glenn Morris <[email protected]> | 2003-04-12 15:44:59 +0000 |
| commit | 1d97a48dc2382af40461b9f1c798bad4c99f07b7 (patch) | |
| tree | 3fa18b9914c401d95e4522805376ab678abe5d48 /lisp/progmodes/fortran.el | |
| parent | 88ff724bdf1d947c9643ecd5c0fe915f3acf60fa (diff) | |
(fortran-abbrev-start): Only offer help if abbrev-mode is active.
Diffstat (limited to 'lisp/progmodes/fortran.el')
| -rw-r--r-- | lisp/progmodes/fortran.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el index e3a29289e8..084320bca3 100644 --- a/lisp/progmodes/fortran.el +++ b/lisp/progmodes/fortran.el @@ -784,8 +784,9 @@ Any other key combination is executed normally." (interactive) (let (c) (insert last-command-char) - (if (or (eq (setq c (read-event)) ??) ;insert char if not equal to `?' - (eq c help-char)) + (if (and abbrev-mode + (or (eq (setq c (read-event)) ??) ;insert char if not equal to `?' + (eq c help-char))) (fortran-abbrev-help) (setq unread-command-events (list c))))) |