diff options
| author | Sam Steingold | 2001-10-26 20:55:36 +0000 |
|---|---|---|
| committer | Sam Steingold | 2001-10-26 20:55:36 +0000 |
| commit | e5d1dee9111cd8088bfbff62c831e3345d14c99b (patch) | |
| tree | c8439dd53fe9aff3c5d5dd1b079af64e510e5af2 /lisp/textmodes | |
| parent | 58203d918e68faba80433f12c86a36642dad9a42 (diff) | |
| download | emacs-e5d1dee9111cd8088bfbff62c831e3345d14c99b.tar.gz emacs-e5d1dee9111cd8088bfbff62c831e3345d14c99b.zip | |
(html-mode); set `mode-name' based on `html-xhtml'
Diffstat (limited to 'lisp/textmodes')
| -rw-r--r-- | lisp/textmodes/sgml-mode.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/textmodes/sgml-mode.el b/lisp/textmodes/sgml-mode.el index 8822bdb132f..e864327a13f 100644 --- a/lisp/textmodes/sgml-mode.el +++ b/lisp/textmodes/sgml-mode.el | |||
| @@ -1283,6 +1283,8 @@ To work around that, do: | |||
| 1283 | nil t) | 1283 | nil t) |
| 1284 | (set (make-local-variable 'html-xhtml) | 1284 | (set (make-local-variable 'html-xhtml) |
| 1285 | (string= "X" (match-string 1)))))) | 1285 | (string= "X" (match-string 1)))))) |
| 1286 | (when html-xhtml | ||
| 1287 | (setq mode-name "XHTML")) | ||
| 1286 | ;; It's for the user to decide if it defeats it or not -stef | 1288 | ;; It's for the user to decide if it defeats it or not -stef |
| 1287 | ;; (make-local-variable 'imenu-sort-function) | 1289 | ;; (make-local-variable 'imenu-sort-function) |
| 1288 | ;; (setq imenu-sort-function nil) ; sorting the menu defeats the purpose | 1290 | ;; (setq imenu-sort-function nil) ; sorting the menu defeats the purpose |