# HG changeset patch
# User Karl Fogel <kfogel@red-bean.com>
# Date 1170967959 0
# Node ID e4e80762e2074f355a8cb08f3fcd471612a999c8
# Parent  5d08826765c656f5be9bd679e2a8fe4de7dfbce7
Revert previous change, at request of RMS:

(fundamental-mode-hook): Remove.
(fundamental-mode): Run after-change-major-mode-hooks manually,
and don't run the now-nonexistent fundamental-mode-hook.

diff -r 5d08826765c6 -r e4e80762e207 lisp/ChangeLog
--- a/lisp/ChangeLog	Thu Feb 08 19:54:46 2007 +0000
+++ b/lisp/ChangeLog	Thu Feb 08 20:52:39 2007 +0000
@@ -4,6 +4,13 @@
 
 2007-02-08  Karl Fogel  <kfogel@red-bean.com>
 
+	* simple.el: Revert previous change, at request of RMS:
+	(fundamental-mode-hook): Remove.
+	(fundamental-mode): Run after-change-major-mode-hooks manually,
+	and don't run the now-nonexistent fundamental-mode-hook.
+	
+2007-02-08  Karl Fogel  <kfogel@red-bean.com>
+
 	* simple.el (fundamental-mode-hook): Declare new hook.
 	(fundamental-mode): Run the new dedicated hook, and don't run
 	after-change-major-mode-hooks manually anymore.
diff -r 5d08826765c6 -r e4e80762e207 lisp/simple.el
--- a/lisp/simple.el	Thu Feb 08 19:54:46 2007 +0000
+++ b/lisp/simple.el	Thu Feb 08 20:52:39 2007 +0000
@@ -382,19 +382,13 @@
 
 ;;;
 
-(defcustom fundamental-mode-hook nil
-  "Normal hook run for buffers not specialized for anything in particular."
-  :type 'hook
-  ;; No group is a perfect fit, but this is probably the closest.
-  :group 'editing-basics)
-
 (defun fundamental-mode ()
   "Major mode not specialized for anything in particular.
-Other major modes are defined by comparison with this one.
-Entry to this mode runs the normal hook `fundamental-mode-hook'."
+Other major modes are defined by comparison with this one."
   (interactive)
   (kill-all-local-variables)
-  (run-mode-hooks 'fundamental-mode-hook))
+  (unless delay-mode-hooks
+    (run-hooks 'after-change-major-mode-hook)))
 
 ;; Making and deleting lines.