diff options
| author | Reuben Thomas <rrt@sc3d.org> | 2016-12-04 14:37:37 +0000 |
|---|---|---|
| committer | Reuben Thomas <rrt@sc3d.org> | 2016-12-13 19:43:49 +0000 |
| commit | 6e88249cdcfefee6ed8f27ff4e93e433ac58ada0 (patch) | |
| tree | 264acf81846c2fe855d98003171cc7e0a62bc0ef /lisp/textmodes/ispell.el | |
| parent | 8245e5b9b00b4a839aa201d7883d5e55e8f66879 (diff) | |
| download | emacs-6e88249cdcfefee6ed8f27ff4e93e433ac58ada0.tar.gz | |
Remove XEmacs-specific horizontal scrollbar handling in ispell.el
* lisp/textmodes/ispell.el (ispell-command-loop): Remove
XEmacs-specific code.
Diffstat (limited to 'lisp/textmodes/ispell.el')
| -rw-r--r-- | lisp/textmodes/ispell.el | 10 |
1 files changed, 2 insertions, 8 deletions
diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el index f0bb5693515..8978d1460bc 100644 --- a/lisp/textmodes/ispell.el +++ b/lisp/textmodes/ispell.el @@ -2094,15 +2094,9 @@ Global `ispell-quit' set to start location to continue spell session." "-- %b -- word: " word " -- dict: " (or ispell-current-dictionary "default") " -- prog: " (file-name-nondirectory ispell-program-name))) - ;; XEmacs: no need for horizontal scrollbar in choices window + ;; No need for horizontal scrollbar in choices window (ispell-with-no-warnings - (and (fboundp 'set-specifier) - (boundp 'horizontal-scrollbar-visible-p) - (set-specifier horizontal-scrollbar-visible-p nil - (cons (current-buffer) nil)))) - (ispell-with-no-warnings - (and (boundp 'horizontal-scroll-bar) - (setq horizontal-scroll-bar nil))) + (setq horizontal-scroll-bar nil)) (erase-buffer) (if guess (progn |