diff options
| author | Juanma Barranquero | 2008-11-04 09:48:55 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2008-11-04 09:48:55 +0000 |
| commit | ca68aad82be24040ebca4ca65f91c69497870e6a (patch) | |
| tree | 83d6a12780b2230fbdbdf9bfb87598ebc7b81c19 /lisp/dframe.el | |
| parent | a72000251e06a5720b99fdb12068210809941e63 (diff) | |
| download | emacs-ca68aad82be24040ebca4ca65f91c69497870e6a.tar.gz emacs-ca68aad82be24040ebca4ca65f91c69497870e6a.zip | |
* dframe.el (dframe-mouse-position-function)
(dframe-reposition-frame-emacs, dframe-pass-event-to-popup-mode-menu)
(dframe-mouse-set-point): Fix typos in docstrings.
Diffstat (limited to 'lisp/dframe.el')
| -rw-r--r-- | lisp/dframe.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/dframe.el b/lisp/dframe.el index 2086347dc90..7cb5c2684fa 100644 --- a/lisp/dframe.el +++ b/lisp/dframe.el | |||
| @@ -173,7 +173,7 @@ Valid clicks are mouse 2, our double mouse 1.") | |||
| 173 | (make-variable-buffer-local 'dframe-mouse-click-function) | 173 | (make-variable-buffer-local 'dframe-mouse-click-function) |
| 174 | 174 | ||
| 175 | (defvar dframe-mouse-position-function nil | 175 | (defvar dframe-mouse-position-function nil |
| 176 | "*A function to called to position the cursor for a mouse click.") | 176 | "*A function to call to position the cursor for a mouse click.") |
| 177 | (make-variable-buffer-local 'dframe-mouse-position-function) | 177 | (make-variable-buffer-local 'dframe-mouse-position-function) |
| 178 | 178 | ||
| 179 | (defvar dframe-power-click nil | 179 | (defvar dframe-power-click nil |
| @@ -424,7 +424,7 @@ LOCATION can be one of 'random, 'left, 'right, 'left-right, or 'top-bottom." | |||
| 424 | (defun dframe-reposition-frame-emacs (new-frame parent-frame location) | 424 | (defun dframe-reposition-frame-emacs (new-frame parent-frame location) |
| 425 | "Move NEW-FRAME to be relative to PARENT-FRAME. | 425 | "Move NEW-FRAME to be relative to PARENT-FRAME. |
| 426 | LOCATION can be one of 'random, 'left-right, 'top-bottom, or | 426 | LOCATION can be one of 'random, 'left-right, 'top-bottom, or |
| 427 | a cons cell indicationg a position of the form (LEFT . TOP)." | 427 | a cons cell indicating a position of the form (LEFT . TOP)." |
| 428 | ;; Position dframe. | 428 | ;; Position dframe. |
| 429 | ;; Do no positioning if not on a windowing system, | 429 | ;; Do no positioning if not on a windowing system, |
| 430 | (unless (or (not window-system) (eq window-system 'pc)) | 430 | (unless (or (not window-system) (eq window-system 'pc)) |
| @@ -766,7 +766,7 @@ Evaluates all cached timer functions in sequence." | |||
| 766 | (fboundp 'function-max-args) | 766 | (fboundp 'function-max-args) |
| 767 | (setq max-args (function-max-args 'popup-mode-menu)) | 767 | (setq max-args (function-max-args 'popup-mode-menu)) |
| 768 | (not (zerop max-args)))) | 768 | (not (zerop max-args)))) |
| 769 | "The EVENT arg to 'popup-mode-menu' was introduced in XEmacs 21.4.0.") | 769 | "The EVENT arg to `popup-mode-menu' was introduced in XEmacs 21.4.0.") |
| 770 | 770 | ||
| 771 | ;; In XEmacs, we make popup menus work on the item over mouse (as | 771 | ;; In XEmacs, we make popup menus work on the item over mouse (as |
| 772 | ;; opposed to where the point happens to be.) We attain this by | 772 | ;; opposed to where the point happens to be.) We attain this by |
| @@ -852,7 +852,7 @@ BUFFER and POSITION are optional because XEmacs doesn't use them." | |||
| 852 | (funcall dframe-help-echo-function)))))) | 852 | (funcall dframe-help-echo-function)))))) |
| 853 | 853 | ||
| 854 | (defun dframe-mouse-set-point (e) | 854 | (defun dframe-mouse-set-point (e) |
| 855 | "Set POINT based on event E. | 855 | "Set point based on event E. |
| 856 | Handles clicking on images in XEmacs." | 856 | Handles clicking on images in XEmacs." |
| 857 | (if (and (featurep 'xemacs) | 857 | (if (and (featurep 'xemacs) |
| 858 | (save-excursion | 858 | (save-excursion |