Parent Directory | Revision Log | Patch
revision 1.101 by gm, Wed Feb 12 21:51:45 2003 UTC | revision 1.102 by gm, Sat Apr 12 15:44:59 2003 UTC | |
---|---|---|
# | Line 784 Any other key combination is executed no | Line 784 Any other key combination is executed no |
784 | (interactive) | (interactive) |
785 | (let (c) | (let (c) |
786 | (insert last-command-char) | (insert last-command-char) |
787 | (if (or (eq (setq c (read-event)) ??) ;insert char if not equal to `?' | (if (and abbrev-mode |
788 | (eq c help-char)) | (or (eq (setq c (read-event)) ??) ;insert char if not equal to `?' |
789 | (eq c help-char))) | |
790 | (fortran-abbrev-help) | (fortran-abbrev-help) |
791 | (setq unread-command-events (list c))))) | (setq unread-command-events (list c))))) |
792 |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |