Commit 51420cc7 authored by Jim Blandy's avatar Jim Blandy

* term/x-win.el: Disable suspending under X windows by setting

	suspend-hooks, not suspend-hook.  The latter is an obsolete name.
	Use add-hook instead of setting suspend-hooks directly.
parent b1839491
......@@ -508,9 +508,10 @@ This returns ARGS with the arguments that have been processed removed."
(setq x-display-name (getenv "DISPLAY"))))
(setq frame-creation-function 'x-create-frame)
(setq suspend-hook
'(lambda ()
(error "Suspending an emacs running under X makes no sense")))
(defun x-win-suspend-error ()
(error "Suspending an emacs running under X makes no sense"))
(add-hook 'suspend-hooks 'x-win-suspend-error)
;;; Arrange for the kill and yank functions to set and check the clipboard.
(setq interprogram-cut-function 'x-select-text)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment