* sun-mouse.el (suspend-emacstool): Run suspend-hook, not

suspend-hooks.
This commit is contained in:
Jim Blandy 1993-05-03 04:05:33 +00:00
parent b22795d3e8
commit d5ec09ce2e

View file

@ -665,7 +665,7 @@ If running under as a detached process emacstool,
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))