From 14acf2f55e96b3d01cd4f42508313a87d01c65cf Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Fri, 28 Aug 2009 17:02:53 +0000 Subject: * gnus/nnheader.el (nnheader-find-file-noselect): * gnus/mm-util.el (mm-insert-file-contents): * org/org-html.el (org-export-as-html): * org/org-docbook.el (org-export-as-docbook): * textmodes/reftex.el (reftex-get-file-buffer-force): * progmodes/verilog-mode.el (verilog-batch-execute-func): * emulation/viper.el (viper-go-away, viper-set-hooks): * emacs-lisp/re-builder.el (re-builder-unload-function): * emacs-lisp/bytecomp.el (byte-compile-file): * ses.el (ses-unload-function): * hexl.el (hexl-find-file): * files.el (normal-mode): * ehelp.el (with-electric-help): * autoinsert.el (auto-insert-alist): * arc-mode.el (archive-mode): Use (default-value 'major-mode) instead of default-major-mode. --- lisp/autoinsert.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lisp/autoinsert.el') diff --git a/lisp/autoinsert.el b/lisp/autoinsert.el index 17a9e4258a2..0fbc3d66c79 100644 --- a/lisp/autoinsert.el +++ b/lisp/autoinsert.el @@ -128,7 +128,7 @@ If this contains a %s, that will be replaced by the matching rule." (("/bin/.*[^/]\\'" . "Shell-Script mode magic number") lambda () - (if (eq major-mode default-major-mode) + (if (eq major-mode (default-value 'major-mode)) (sh-mode))) (ada-mode . ada-header) -- cgit v1.2.3