[Emacs-diffs] Changes to emacs/lisp/textmodes/ispell.el

[Richard M. Stallman]

Index: emacs/lisp/textmodes/ispell.el
diff -c emacs/lisp/textmodes/ispell.el:1.127 
emacs/lisp/textmodes/ispell.el:1.128
*** emacs/lisp/textmodes/ispell.el:1.127        Thu Dec 20 13:10:44 2001
--- emacs/lisp/textmodes/ispell.el      Mon Jan 21 20:09:12 2002
***************
*** 1873,1886 ****
              (insert (concat help-1 "\n" help-2 "\n" help-3))
              (sit-for 5)
              (kill-buffer "*Ispell Help*"))
!         (select-window (minibuffer-window))
!         (erase-buffer)
!         (message nil)
!         ;;(set-minibuffer-window (selected-window))
!         (enlarge-window 2)
!         (insert (concat help-1 "\n" help-2 "\n" help-3))
!         (sit-for 5)
!         (erase-buffer))))))
  
  
  (defun lookup-words (word &optional lookup-dict)
--- 1873,1888 ----
              (insert (concat help-1 "\n" help-2 "\n" help-3))
              (sit-for 5)
              (kill-buffer "*Ispell Help*"))
!         (unwind-protect
!             (progn
!               (select-window (minibuffer-window))
!               (erase-buffer)
!               (message nil)
!               ;;(set-minibuffer-window (selected-window))
!               (enlarge-window 2)
!               (insert (concat help-1 "\n" help-2 "\n" help-3))
!               (sit-for 5))
!           (erase-buffer)))))))
  
  
  (defun lookup-words (word &optional lookup-dict)