From 4fb17037312adb9922775cceb40f49d45035e3b5 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 4 Feb 1998 21:04:41 +0000 Subject: [PATCH] (suspend-hook, suspend-resume-hook): New defvars. --- lisp/subr.el | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/lisp/subr.el b/lisp/subr.el index d344754c34..a3d6554e35 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 -- 2.20.1