# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 731833663 0
# Node ID 79865d704b209d6e7199dde03a92ffe3b6a61a37
# Parent  d38d32084c15794255aeb9600b9bd7b89a4c3df1
	* sun-mouse.el (suspend-emacstool): Run suspend-hooks, not
	suspend-hook.

diff -r d38d32084c15 -r 79865d704b20 lisp/term/sun-mouse.el
--- a/lisp/term/sun-mouse.el	Thu Mar 11 07:07:17 1993 +0000
+++ b/lisp/term/sun-mouse.el	Thu Mar 11 07:07:43 1993 +0000
@@ -665,7 +665,7 @@
 you don't want to suspend  (there is no way to resume), 
 just close the window, and wait for reopening."
   (interactive)
-  (run-hooks 'suspend-hook)
+  (run-hooks 'suspend-hooks)
   (if stuffstring (send-string-to-terminal stuffstring))
   (send-string-to-terminal "\033[2t")	; To close EmacsTool window.
   (run-hooks 'suspend-resume-hook))