From: Richard M. Stallman <rms@gnu.org>
Date: Wed, 4 Feb 1998 21:04:41 +0000 (+0000)
Subject: (suspend-hook, suspend-resume-hook): New defvars.
X-Git-Tag: emacs-20.3~2228
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4fb17037312adb9922775cceb40f49d45035e3b5;p=emacs.git

(suspend-hook, suspend-resume-hook): New defvars.
---

diff --git a/lisp/subr.el b/lisp/subr.el
index d344754c34b..a3d6554e354 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -836,6 +836,12 @@ If MESSAGE is nil, instructions to type EXIT-CHAR are displayed there."
 ;; Give it a global value to avoid compiler warnings.
 (defvar font-lock-defaults nil)
 
+(defvar suspend-hook nil
+  "Normal hook run by `suspend-emacs', before suspending.")
+
+(defvar suspend-resume-hook nil
+  "Normal hook run by `suspend-emacs', after Emacs is continued.")
+
 ;; Avoid compiler warnings about this variable,
 ;; which has a special meaning on certain system types.
 (defvar buffer-file-type nil