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,