Mercurial > emacs
comparison lisp/textmodes/ispell.el @ 23847:8d6ae4ca21a7
Take out the eval-when's.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Thu, 10 Dec 1998 03:11:59 +0000 |
parents | f7665af4bdf8 |
children | 1f671d01563a |
comparison
equal
deleted
inserted
replaced
23846:e2e16f655cff | 23847:8d6ae4ca21a7 |
---|---|
525 (const iso-8859-1) | 525 (const iso-8859-1) |
526 (const iso-8859-2)))) | 526 (const iso-8859-2)))) |
527 :group 'ispell) | 527 :group 'ispell) |
528 | 528 |
529 ;;; update the dictionaries at load time | 529 ;;; update the dictionaries at load time |
530 (eval-when (load) | 530 (setq ispell-dictionary-alist |
531 (setq ispell-dictionary-alist | 531 (append ispell-dictionary-alist-1 ispell-dictionary-alist-2)) |
532 (append ispell-dictionary-alist-1 ispell-dictionary-alist-2))) | |
533 | |
534 | |
535 | 532 |
536 ;;; The preparation of the menu bar menu must be autoloaded | 533 ;;; The preparation of the menu bar menu must be autoloaded |
537 ;;; because otherwise this file gets autoloaded every time Emacs starts | 534 ;;; because otherwise this file gets autoloaded every time Emacs starts |
538 ;;; so that it can set up the menus and determine keyboard equivalents. | 535 ;;; so that it can set up the menus and determine keyboard equivalents. |
539 | 536 |
540 ;;;###autoload | 537 ;;;###autoload |
541 (defvar ispell-menu-map nil "Key map for ispell menu.") | 538 (defvar ispell-menu-map nil "Key map for ispell menu.") |
542 ;;; redo menu when loading ispell to get dictionary modifications | 539 ;;; redo menu when loading ispell to get dictionary modifications |
543 (eval-when (load) (setq ispell-menu-map nil)) | 540 (setq ispell-menu-map nil) |
544 | 541 |
545 ;;;###autoload | 542 ;;;###autoload |
546 (defvar ispell-menu-xemacs nil | 543 (defvar ispell-menu-xemacs nil |
547 "Spelling menu for XEmacs. | 544 "Spelling menu for XEmacs. |
548 If nil when package is loaded, a standard menu will be set, | 545 If nil when package is loaded, a standard menu will be set, |