Mercurial > emacs

comparison lisp/abbrev.el @ 662:8a533acedb77

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Eric S. Raymond <esr@snark.thyrsus.com>
date Sat, 30 May 1992 23:54:21 +0000
parents cb75ab565260
children a8d94735277e
comparison
equal deleted inserted replaced
661:36fbc3f71803 662:8a533acedb77
1 ;; Abbrev mode commands for Emacs 1 ;;; abbrev.el --- abbrev mode commands for Emacs
2 2
3 ;; Copyright (C) 1985-1991 Free Software Foundation, Inc. 3 ;; Copyright (C) 1985-1991 Free Software Foundation, Inc.
4 4
5 ;; This file is part of GNU Emacs. 5 ;; This file is part of GNU Emacs.
6 6
285 (buffer-substring 285 (buffer-substring
286 (save-excursion (forward-word -1) (point)) 286 (save-excursion (forward-word -1) (point))
287 pnt))) 287 pnt)))
288 (if (or noquery (y-or-n-p (format "Expand `%s'? " string))) 288 (if (or noquery (y-or-n-p (format "Expand `%s'? " string)))
289 (expand-abbrev))))))) 289 (expand-abbrev)))))))
290
291 ;;; abbrev.el ends here