Mercurial > emacs
comparison lisp/frame.el @ 21215:2702850b72d6
(focus-follows-mouse): Make it defcustom.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 18 Mar 1998 20:03:48 +0000 |
| parents | 7a873226ee07 |
| children | 54c89f745c5d |
comparison
equal
deleted
inserted
replaced
| 21214:7a873226ee07 | 21215:2702850b72d6 |
|---|---|
| 495 (setq frame-initial-geometry-arguments | 495 (setq frame-initial-geometry-arguments |
| 496 (nreverse frame-initial-geometry-arguments)) | 496 (nreverse frame-initial-geometry-arguments)) |
| 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. |
| 505 All frames are arranged in a cyclic order. | 507 All frames are arranged in a cyclic order. |
| 506 This command selects the frame ARG steps away in that order. | 508 This command selects the frame ARG steps away in that order. |