# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 765663739 0
# Node ID b7b510d4e406a9631189b46b1a66ef9dddd591b0
# Parent  301d0609754b24f856395a20aa0ad35f3d794d85
(kill-emacs-hook): Use add-hook.

diff -r 301d0609754b -r b7b510d4e406 lisp/term/wyse50.el
--- a/lisp/term/wyse50.el	Wed Apr 06 06:57:24 1994 +0000
+++ b/lisp/term/wyse50.el	Wed Apr 06 20:22:19 1994 +0000
@@ -142,9 +142,9 @@
 ;;; scrolled of the screen.  Suspending (C-z) does not cause this problem.
 ;;; On such terminals, Emacs should sacrifice the first and last character of
 ;;; each mode line, rather than a whole screen column!
-(setq kill-emacs-hook
-      (function (lambda () (interactive)
-		  (send-string-to-terminal
-		   (concat "\ea23R" (1+ (frame-width)) "C\eG0")))))
+(add-hook 'kill-emacs-hook
+	  (function (lambda () (interactive)
+		      (send-string-to-terminal
+		       (concat "\ea23R" (1+ (frame-width)) "C\eG0")))))
 
 ;;; wyse50.el ends here