Mercurial > emacs
comparison lisp/international/latexenc.el @ 63084:33bc4355d988
(latexenc-find-file-coding-system):
Undo part of last patch, to turn off a compiler warning.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Mon, 06 Jun 2005 18:13:21 +0000 |
| parents | ecfed70e0c5c |
| children | 81d7efcce2ff |
comparison
equal
deleted
inserted
replaced
| 63083:8f7ea9a06c4f | 63084:33bc4355d988 |
|---|---|
| 157 (if (and (null latexenc-main-file) ;Stop at first. | 157 (if (and (null latexenc-main-file) ;Stop at first. |
| 158 (file-exists-p (concat file ext))) | 158 (file-exists-p (concat file ext))) |
| 159 (setq latexenc-main-file (concat file ext))))))) | 159 (setq latexenc-main-file (concat file ext))))))) |
| 160 ;; try tex-modes tex-guess-main-file | 160 ;; try tex-modes tex-guess-main-file |
| 161 (when (and (not latexenc-dont-use-tex-guess-main-file-flag) | 161 (when (and (not latexenc-dont-use-tex-guess-main-file-flag) |
| 162 (not latexenc-main-file) | 162 (not latexenc-main-file)) |
| 163 (fboundp 'tex-guess-main-file)) | 163 ;; Use a separate `when' so the byte-compiler sees the fboundp. |
| 164 (let ((tex-start-of-header "\\\\document\\(style\\|class\\)")) | 164 (when (fboundp 'tex-guess-main-file) |
| 165 (setq latexenc-main-file (tex-guess-main-file)))) | 165 (let ((tex-start-of-header "\\\\document\\(style\\|class\\)")) |
| 166 (setq latexenc-main-file (tex-guess-main-file))))) | |
| 166 ;; if we found a master/main file get the coding system from it | 167 ;; if we found a master/main file get the coding system from it |
| 167 (if (and latexenc-main-file | 168 (if (and latexenc-main-file |
| 168 (file-readable-p latexenc-main-file)) | 169 (file-readable-p latexenc-main-file)) |
| 169 (let* ((latexenc-dont-use-tex-guess-main-file-flag t) | 170 (let* ((latexenc-dont-use-tex-guess-main-file-flag t) |
| 170 (latexenc-dont-use-TeX-master-flag t) | 171 (latexenc-dont-use-TeX-master-flag t) |