]> code.delx.au - gnu-emacs/commitdiff
(mail-yank-prefix): Add defvar.
authorJuanma Barranquero <lekktu@gmail.com>
Wed, 31 Aug 2005 10:26:26 +0000 (10:26 +0000)
committerJuanma Barranquero <lekktu@gmail.com>
Wed, 31 Aug 2005 10:26:26 +0000 (10:26 +0000)
lisp/textmodes/ispell.el

index 173d5eb66b27dbad4e7fd295df9fa186cee92f64..8bd8ed2d69239fc51445871a781ffb9877816587 100644 (file)
 
 ;;; Code:
 
+(defvar mail-yank-prefix)
+
 ;;; Custom.el macros require recompiling this when they are not present.
 ;;; Add in backward compatible custom support.
 (eval-when-compile
@@ -914,7 +916,7 @@ Assumes that value contains no whitespace."
       (insert-file-contents data-file)
       ;; There is zero or one line with special characters declarations.
       (when (search-forward-regexp "^special" nil t)
-       (let ((specials (split-string 
+       (let ((specials (split-string
                         (buffer-substring (point)
                                           (progn (end-of-line) (point))))))
          ;; The line looks like: special ' -** - -** . -** : -*-
@@ -951,7 +953,7 @@ Assumes that value contains no whitespace."
        (insert-file-contents alias-file)
        ;; Look for a line "add FOO.multi", extract FOO
        (when (search-forward-regexp "^add \\([^.]+\\)\\.multi" nil t)
-         (let* ((aliasname (file-name-sans-extension 
+         (let* ((aliasname (file-name-sans-extension
                             (file-name-nondirectory alias-file)))
                 (already-exists-p (assoc aliasname ispell-dictionary-alist))
                 (realname (match-string 1))