/[emacs]/emacs/lisp/textmodes/ispell.el
ViewVC logotype

Diff of /emacs/lisp/textmodes/ispell.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.122 by eliz, Fri Sep 7 15:35:56 2001 UTC revision 1.122.4.1 by rms, Tue Jan 22 07:36:53 2002 UTC
# Line 1886  SPC:   Accept word this time. Line 1886  SPC:   Accept word this time.
1886                (insert (concat help-1 "\n" help-2 "\n" help-3))                (insert (concat help-1 "\n" help-2 "\n" help-3))
1887                (sit-for 5)                (sit-for 5)
1888                (kill-buffer "*Ispell Help*"))                (kill-buffer "*Ispell Help*"))
1889            (select-window (minibuffer-window))            (unwind-protect
1890            (erase-buffer)                (progn
1891            (if (not version18p) (message nil))                  (select-window (minibuffer-window))
1892            ;;(set-minibuffer-window (selected-window))                  (erase-buffer)
1893            (enlarge-window 2)                  (if (not version18p) (message nil))
1894            (insert (concat help-1 "\n" help-2 "\n" help-3))                  ;;(set-minibuffer-window (selected-window))
1895            (sit-for 5)                  (enlarge-window 2)
1896            (erase-buffer))))))                  (insert (concat help-1 "\n" help-2 "\n" help-3))
1897                    (sit-for 5))
1898                (erase-buffer)))))))
1899    
1900    
1901  (defun lookup-words (word &optional lookup-dict)  (defun lookup-words (word &optional lookup-dict)

Legend:
Removed from v.1.122  
changed lines
  Added in v.1.122.4.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26