From 693f800dd6904aac5c7030f847ab18c132e49928 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 15 Jan 1996 05:08:57 +0000 Subject: [PATCH] (auto-mode-alist): Add sgml-mode and html-mode. (write-contents-hooks): Doc fix. --- lisp/files.el | 15 ++++++++++----- 1 file changed, 10 insertions(+), 5 deletions(-) diff --git a/lisp/files.el b/lisp/files.el index c0f5c718b5f..dbd8209fbdc 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -17,8 +17,9 @@ ;; GNU General Public License for more details. ;; You should have received a copy of the GNU General Public License -;; along with GNU Emacs; see the file COPYING. If not, write to -;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. +;; along with GNU Emacs; see the file COPYING. If not, write to the +;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, +;; Boston, MA 02111-1307, USA. ;;; Commentary: @@ -220,7 +221,11 @@ and the rest are not called. This variable is meant to be used for hooks that pertain to the buffer's contents, not to the particular visited file; thus, `set-visited-file-name' does not clear this variable; but changing the -major mode does clear it if you have made it buffer local. +major mode does clear it. + +This variable automatically becomes buffer-local whenever it is set. +If you use `add-hooks' to add elements to the list, use nil for the +LOCAL argument. See also `write-file-hooks'.") (make-variable-buffer-local 'write-contents-hooks) @@ -982,9 +987,9 @@ run `normal-mode' explicitly." ("\\.y\\'" . c-mode) ("\\.lex\\'" . c-mode) ("\\.oak\\'" . scheme-mode) - ("\\.sgm\\'" . sgml-mode) - ("\\.sgml\\'" . sgml-mode) + ("\\.sgml?\\'" . sgml-mode) ("\\.dtd\\'" . sgml-mode) + ("\\.s?html?\\'" . html-mode) ;; .emacs following a directory delimiter ;; in either Unix or VMS syntax. ("[]>:/]\\..*emacs\\'" . emacs-lisp-mode) -- 2.39.2