specially when splitting the line into words.
(setq ispell-buffer-local-name (buffer-name)))
(let ((end (save-excursion (end-of-line) (point)))
string)
- (while (re-search-forward " *\\([^ \"]+\\)" end t)
+ ;; This used to treat " specially, but that loses for some
+ ;; people using them to fake accented letters.
+ (while (re-search-forward " *\\([^ ]+\\)" end t)
(setq string (buffer-substring (match-beginning 1) (match-end 1)))
(process-send-string ispell-process (concat "@" string "\n")))))))