procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(fortran-abbrev-start): Only offer help if abbrev-mode is active.

Browse source
This commit is contained in:
Glenn Morris 2003-04-12 15:44:59 +00:00
parent 88ff724bdf
commit 1d97a48dc2
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/progmodes/fortran.el
View file

@ -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)))))