--- ispell.el.orig 2015-05-02 11:24:32.000000000 +1000 +++ ispell.el 2015-05-02 14:34:42.573950776 +1000 @@ -4320,7 +4320,7 @@ (let (line-okay search done found) (while (not done) (let ((case-fold-search nil)) - (setq search (search-forward ispell-words-keyword nil 'move) + (setq search (search-forward ispell-words-keyword nil t) found (or found search) line-okay (< (+ (length word) 1 ; 1 for space after word.. (progn (end-of-line) (current-column))) @@ -4331,8 +4331,10 @@ (setq done t) (if (null search) (progn - (open-line 1) - (unless found (newline)) + (if found (insert "\n") ;; after an existing LocalWords + (goto-char (point-max)) ;; no LocalWords, go to end of file + (open-line 1) + (newline)) (insert (if comment-start (concat (if (fboundp 'comment-padright)