ispell.el (ispell-add-per-file-word-list): Use `concat' to create string for insertion.

Fixes: debbugs:8579

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index bc63548..9cd9036 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2011-05-03  Agustín Martín Domingo  <agustin.martin@hispalinux.es>
+
+       * textmodes/ispell.el (ispell-add-per-file-word-list):
+       Use `concat' for string.
+
 2011-05-03  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * textmodes/bibtex.el (bibtex-fill-field-bounds, bibtex-fill-entry):

diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index a65ed22..c196218 100644 (file)
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -3916,7 +3916,7 @@ Both should not be used to define a buffer-local dictionary."
                    (open-line 1)
                    (unless found (newline))
                    (insert (if comment-start
-                                (progn
+                                (concat
                                   (if (fboundp 'comment-padright)
                                       ;; Try and use the proper comment marker,
                                       ;; e.g. ";;" rather than ";".