comparison lisp/packages/ispell.el @ 100:4be1180a9e89 r20-1b2

Import from CVS: tag r20-1b2
author cvs
date Mon, 13 Aug 2007 09:15:11 +0200
parents c7528f8e288d
children cca96a509cfe
comparison
equal deleted inserted replaced
99:2d83cbd90d8d 100:4be1180a9e89
1268 (if (string-lessp "19" emacs-version) 1268 (if (string-lessp "19" emacs-version)
1269 (message nil)) 1269 (message nil))
1270 (enlarge-window 2) 1270 (enlarge-window 2)
1271 ;; Make sure we display the minibuffer 1271 ;; Make sure we display the minibuffer
1272 ;; in this window, not some other. 1272 ;; in this window, not some other.
1273 (set-minibuffer-window (selected-window)) 1273 (if (fboundp 'set-minibuffer-window)
1274 (set-minibuffer-window (selected-window)))
1274 (insert (concat help-1 "\n" help-2 "\n" help-3)))) 1275 (insert (concat help-1 "\n" help-2 "\n" help-3))))
1275 (sit-for 5) 1276 (sit-for 5)
1276 (erase-buffer))))) 1277 (erase-buffer)))))
1277 1278
1278 1279