354 |
found)) |
found)) |
355 |
|
|
356 |
(defun TeX-run-ispell-on-document (command ignored name) |
(defun TeX-run-ispell-on-document (command ignored name) |
357 |
"Run ispell on all files belonging to the current document." |
"Run ispell on all open files belonging to the current document." |
358 |
(interactive) |
(interactive) |
359 |
(TeX-ispell-document "")) |
(TeX-ispell-document "")) |
360 |
|
|
361 |
(defun TeX-ispell-document (name) |
(defun TeX-ispell-document (name) |
362 |
"Run ispell on all files belonging to the current document." |
"Run ispell on all open files belonging to the current document." |
363 |
(interactive (list (TeX-master-file))) |
(interactive (list (TeX-master-file))) |
364 |
(if (string-equal name "") |
(if (string-equal name "") |
365 |
(setq name (TeX-master-file))) |
(setq name (TeX-master-file))) |