diff options
| author | Richard M. Stallman | 1998-03-18 20:03:48 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-03-18 20:03:48 +0000 |
| commit | 0ac18fb09b7e8e13d61cb2e375b4f22ba5aeb8b1 (patch) | |
| tree | 383d11e84971e5d5b149a1445cc7355246299eaf | |
| parent | 26ef026df84546906a81ad42929962e6a2ea0fc8 (diff) | |
| download | emacs-0ac18fb09b7e8e13d61cb2e375b4f22ba5aeb8b1.tar.gz emacs-0ac18fb09b7e8e13d61cb2e375b4f22ba5aeb8b1.zip | |
(focus-follows-mouse): Make it defcustom.
| -rw-r--r-- | lisp/frame.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/frame.el b/lisp/frame.el index 2fbc53b9157..82b42b06691 100644 --- a/lisp/frame.el +++ b/lisp/frame.el | |||
| @@ -497,8 +497,10 @@ the user during startup." | |||
| 497 | (cdr param-list)) | 497 | (cdr param-list)) |
| 498 | 498 | ||
| 499 | 499 | ||
| 500 | (defvar focus-follows-mouse t | 500 | (defcustom focus-follows-mouse t |
| 501 | "*Non-nil if window system changes focus when you move the mouse.") | 501 | "*Non-nil if window system changes focus when you move the mouse." |
| 502 | :type 'boolean | ||
| 503 | :group 'frames) | ||
| 502 | 504 | ||
| 503 | (defun other-frame (arg) | 505 | (defun other-frame (arg) |
| 504 | "Select the ARG'th different visible frame, and raise it. | 506 | "Select the ARG'th different visible frame, and raise it. |