changeset 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 87b070dfb087
children 45ecb9b4a6da
files lisp/term/sun-mouse.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
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))