[Emacs-diffs] /srv/bzr/emacs/trunk r104091: ispell.el (ispell-add-per-file-word-list): Use `concat' to create string for insertion.

[Agustin Martin]

------------------------------------------------------------
revno: 104091
fixes bug(s): http://debbugs.gnu.org/8579
committer: Agustin Martin <address@hidden>
branch nick: trunk
timestamp: Tue 2011-05-03 16:11:39 +0200
message:
  ispell.el (ispell-add-per-file-word-list): Use `concat' to create string for 
insertion.
modified:
  lisp/ChangeLog
  lisp/textmodes/ispell.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2011-05-03 14:03:48 +0000
+++ b/lisp/ChangeLog    2011-05-03 14:11:39 +0000
@@ -1,3 +1,8 @@
+2011-05-03  Agustín Martín Domingo  <address@hidden>
+
+       * textmodes/ispell.el (ispell-add-per-file-word-list):
+       Use `concat' for string.
+
 2011-05-03  Stefan Monnier  <address@hidden>
 
        * textmodes/bibtex.el (bibtex-fill-field-bounds, bibtex-fill-entry):

=== modified file 'lisp/textmodes/ispell.el'
--- a/lisp/textmodes/ispell.el  2011-05-03 11:08:15 +0000
+++ b/lisp/textmodes/ispell.el  2011-05-03 14:11:39 +0000
@@ -3916,7 +3916,7 @@
                    (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 ";".