# HG changeset patch
# User Lute Kamstra <lute@gnu.org>
# Date 1118404986 0
# Node ID f48178f79206d720cb7f7be37ae38c20b2dd68c0
# Parent  5592f504d53ffd3885a01862942708006bcb2191
(blackbox-mode): Use run-mode-hooks.

diff -r 5592f504d53f -r f48178f79206 lisp/play/blackbox.el
--- a/lisp/play/blackbox.el	Fri Jun 10 11:38:27 2005 +0000
+++ b/lisp/play/blackbox.el	Fri Jun 10 12:03:06 2005 +0000
@@ -117,14 +117,14 @@
 \\<blackbox-mode-map>\\[bb-bol] and \\[bb-eol] move to the beginning and end of line, respectively.
 
 \\[bb-romp] -- send in a ray from point, or toggle a ball at point
-\\[bb-done] -- end game and get score
-"
+\\[bb-done] -- end game and get score"
   (interactive)
   (kill-all-local-variables)
   (use-local-map blackbox-mode-map)
   (setq truncate-lines t)
   (setq major-mode 'blackbox-mode)
-  (setq mode-name "Blackbox"))
+  (setq mode-name "Blackbox")
+  (run-mode-hooks 'blackbox-mode-hook))
 
 ;;;###autoload
 (defun blackbox (num)