diff lisp/term/sun-mouse.el @ 2636:0b90475af405

* sun-mouse.el (suspend-emacstool): Run suspend-hook, not suspend-hooks.
author Jim Blandy <jimb@redhat.com>
date Mon, 03 May 1993 04:05:33 +0000
parents 79865d704b20
children 1c1a6e2961c2
line wrap: on
line diff
--- a/lisp/term/sun-mouse.el	Mon May 03 03:41:07 1993 +0000
+++ b/lisp/term/sun-mouse.el	Mon May 03 04:05:33 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-hooks)
+  (run-hooks 'suspend-hook)
   (if stuffstring (send-string-to-terminal stuffstring))
   (send-string-to-terminal "\033[2t")	; To close EmacsTool window.
   (run-hooks 'suspend-resume-hook))