Mercurial > emacs

comparison lisp/progmodes/f90.el @ 26607:4cd19d3e4f0f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(f90-abbrev-start): Use `eq' instead of `='.
author Gerd Moellmann <gerd@gnu.org>
date Fri, 26 Nov 1999 13:47:59 +0000
parents ab359f81e2cc
children 5427762a58a5
comparison
equal deleted inserted replaced
26606:12a1dfb72160 26607:4cd19d3e4f0f
1656 (progn 1656 (progn
1657 (setq e (next-command-event)) 1657 (setq e (next-command-event))
1658 (setq c (event-to-character e))) 1658 (setq c (event-to-character e)))
1659 (setq c (read-event))) 1659 (setq c (read-event)))
1660 ;; insert char if not equal to `?' 1660 ;; insert char if not equal to `?'
1661 (if (or (= c ??) (eq c help-char)) 1661 (if (or (eq c ??) (eq c help-char))
1662 (f90-abbrev-help) 1662 (f90-abbrev-help)
1663 (if (string-match "XEmacs" emacs-version) 1663 (if (string-match "XEmacs" emacs-version)
1664 (setq unread-command-event e) 1664 (setq unread-command-event e)
1665 (setq unread-command-events (list c)))))) 1665 (setq unread-command-events (list c))))))
1666 1666