From f3c1563339e5720092d7c2b93e9d488624adad2b Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Fri, 21 Sep 2007 03:58:12 +0000 Subject: [PATCH] (suspend-emacstool): Remove. --- lisp/term/sun-mouse.el | 15 --------------- 1 file changed, 15 deletions(-) diff --git a/lisp/term/sun-mouse.el b/lisp/term/sun-mouse.el index 65ebe193c71..f4c34f74d9c 100644 --- a/lisp/term/sun-mouse.el +++ b/lisp/term/sun-mouse.el @@ -660,21 +660,6 @@ Insert contents into the current buffer at point." (interactive "r") (sun-set-selection (buffer-substring beg end))) -;;; -;;; Support for emacstool -;;; This closes the window instead of stopping emacs. -;;; -(defun suspend-emacstool (&optional stuffstring) - "Suspend emacstool. -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-hook) - (if stuffstring (send-string-to-terminal stuffstring)) - (send-string-to-terminal "\033[2t") ; To close EmacsTool window. - (run-hooks 'suspend-resume-hook)) - (provide 'sun-mouse) (provide 'term/sun-mouse) ; have to (require 'term/sun-mouse) -- 2.39.5