diff options
| author | Juanma Barranquero | 2008-04-18 10:30:38 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2008-04-18 10:30:38 +0000 |
| commit | 89ee01639d7f9fbbe7edbb422e40723ecb6ef103 (patch) | |
| tree | b3385975c5856249469fd23a5af3f43ce4dadd83 | |
| parent | 5e38cdab4557f98e14f0cfcb82d7011ded032c29 (diff) | |
| download | emacs-89ee01639d7f9fbbe7edbb422e40723ecb6ef103.tar.gz emacs-89ee01639d7f9fbbe7edbb422e40723ecb6ef103.zip | |
(mouse-wheel-down-button, mouse-wheel-up-button, mouse-wheel-click-button):
Add WHEN to obsolescence declaration.
| -rw-r--r-- | lisp/mwheel.el | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/lisp/mwheel.el b/lisp/mwheel.el index 8236d08dbc9..7b1ee5f369e 100644 --- a/lisp/mwheel.el +++ b/lisp/mwheel.el | |||
| @@ -56,7 +56,8 @@ | |||
| 56 | 56 | ||
| 57 | (defvar mouse-wheel-down-button 4) | 57 | (defvar mouse-wheel-down-button 4) |
| 58 | (make-obsolete-variable 'mouse-wheel-down-button | 58 | (make-obsolete-variable 'mouse-wheel-down-button |
| 59 | 'mouse-wheel-down-event) | 59 | 'mouse-wheel-down-event |
| 60 | "22.1") | ||
| 60 | (defcustom mouse-wheel-down-event | 61 | (defcustom mouse-wheel-down-event |
| 61 | ;; In the latest versions of XEmacs, we could just use mouse-%s as well. | 62 | ;; In the latest versions of XEmacs, we could just use mouse-%s as well. |
| 62 | (if (memq window-system '(w32 mac)) | 63 | (if (memq window-system '(w32 mac)) |
| @@ -70,7 +71,8 @@ | |||
| 70 | 71 | ||
| 71 | (defvar mouse-wheel-up-button 5) | 72 | (defvar mouse-wheel-up-button 5) |
| 72 | (make-obsolete-variable 'mouse-wheel-up-button | 73 | (make-obsolete-variable 'mouse-wheel-up-button |
| 73 | 'mouse-wheel-up-event) | 74 | 'mouse-wheel-up-event |
| 75 | "22.1") | ||
| 74 | (defcustom mouse-wheel-up-event | 76 | (defcustom mouse-wheel-up-event |
| 75 | ;; In the latest versions of XEmacs, we could just use mouse-%s as well. | 77 | ;; In the latest versions of XEmacs, we could just use mouse-%s as well. |
| 76 | (if (memq window-system '(w32 mac)) | 78 | (if (memq window-system '(w32 mac)) |
| @@ -84,7 +86,8 @@ | |||
| 84 | 86 | ||
| 85 | (defvar mouse-wheel-click-button 2) | 87 | (defvar mouse-wheel-click-button 2) |
| 86 | (make-obsolete-variable 'mouse-wheel-click-button | 88 | (make-obsolete-variable 'mouse-wheel-click-button |
| 87 | 'mouse-wheel-click-event) | 89 | 'mouse-wheel-click-event |
| 90 | "22.1") | ||
| 88 | (defcustom mouse-wheel-click-event | 91 | (defcustom mouse-wheel-click-event |
| 89 | ;; In the latest versions of XEmacs, we could just use mouse-%s as well. | 92 | ;; In the latest versions of XEmacs, we could just use mouse-%s as well. |
| 90 | (intern (format (if (featurep 'xemacs) "button%s" "mouse-%s") | 93 | (intern (format (if (featurep 'xemacs) "button%s" "mouse-%s") |