1410 |
;; (or (easy-mmode-derived-mode-p 'latex-mode) |
;; (or (easy-mmode-derived-mode-p 'latex-mode) |
1411 |
;; (easy-mmode-derived-mode-p 'plain-tex-mode)) |
;; (easy-mmode-derived-mode-p 'plain-tex-mode)) |
1412 |
(save-excursion |
(save-excursion |
1413 |
(goto-char (point-min)) |
(save-restriction |
1414 |
(re-search-forward header-re 10000 t))) |
(widen) |
1415 |
|
(goto-char (point-min)) |
1416 |
|
(re-search-forward header-re 10000 t)))) |
1417 |
(throw 'found (expand-file-name buffer-file-name)))))))) |
(throw 'found (expand-file-name buffer-file-name)))))))) |
1418 |
|
|
1419 |
(defun tex-main-file () |
(defun tex-main-file () |