diff options
Diffstat (limited to 'lisp/term/wyse50.el')
| -rw-r--r-- | lisp/term/wyse50.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/term/wyse50.el b/lisp/term/wyse50.el index 64bd9532de4..55010fec572 100644 --- a/lisp/term/wyse50.el +++ b/lisp/term/wyse50.el @@ -142,9 +142,9 @@ M-r M-x move-to-window-line, Funct up-arrow or down-arrow are similar ;;; 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 |