Commit bf242939 authored by Agustín Martín's avatar Agustín Martín

ispell.el (ispell-add-per-file-word-list): Protect against `nil' value of...

ispell.el (ispell-add-per-file-word-list):  Protect against `nil' value of `comment-start' (Bug#8579).
parent f927985e
2011-05-03 Dirk Ullrich <dirk.ullrich@googlemail.com> (tiny change)
* textmodes/ispell.el (ispell-add-per-file-word-list):
Protect against `nil' value of `comment-start' (Bug#8579).
2011-05-03 Leo Liu <sdl.web@gmail.com>
* isearch.el (isearch-yank-pop): New command.
......
......@@ -3915,14 +3915,18 @@ Both should not be used to define a buffer-local dictionary."
(progn
(open-line 1)
(unless found (newline))
(insert (if (fboundp 'comment-padright)
;; Try and use the proper comment marker,
;; e.g. ";;" rather than ";".
(comment-padright comment-start
(comment-add nil))
comment-start)
" " ispell-words-keyword)
(if (> (length comment-end) 0)
(insert (if comment-start
(progn
(if (fboundp 'comment-padright)
;; Try and use the proper comment marker,
;; e.g. ";;" rather than ";".
(comment-padright comment-start
(comment-add nil))
comment-start)
" ")
"")
ispell-words-keyword)
(if (and comment-end (> (length comment-end) 0))
(save-excursion
(newline)
(insert comment-end)))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment