HCoop
/
bpt
/
emacs.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
(smtpmail-try-auth-methods): If the user has stored a user name, then
[bpt/emacs.git]
/
lisp
/
mwheel.el
diff --git
a/lisp/mwheel.el
b/lisp/mwheel.el
index
c505833
..
4ead168
100644
(file)
--- a/
lisp/mwheel.el
+++ b/
lisp/mwheel.el
@@
-1,9
+1,9
@@
;;; mwheel.el --- Wheel mouse support
;;; mwheel.el --- Wheel mouse support
-;; Copyright (C) 1998, 2000, 2001, 2002, 2002, 2004, 2005, 2006, 2007,
-;; 2008, 2009, 2010 Free Software Foundation, Inc.
+;; Copyright (C) 1998, 2000-2011 Free Software Foundation, Inc.
;; Maintainer: William M. Perry <wmperry@gnu.org>
;; Keywords: mouse
;; Maintainer: William M. Perry <wmperry@gnu.org>
;; Keywords: mouse
+;; Package: emacs
;; This file is part of GNU Emacs.
;; This file is part of GNU Emacs.
@@
-246,6
+246,8
@@
This should only be bound to mouse buttons 4 and 5."
(run-with-timer mouse-wheel-inhibit-click-time nil
'mwheel-inhibit-click-timeout))))
(run-with-timer mouse-wheel-inhibit-click-time nil
'mwheel-inhibit-click-timeout))))
+(put 'mwheel-scroll 'scroll-command t)
+
(defvar mwheel-installed-bindings nil)
;; preloaded ;;;###autoload
(defvar mwheel-installed-bindings nil)
;; preloaded ;;;###autoload
@@
-282,5
+284,4
@@
Return non-nil if the new state is enabled."
(provide 'mwheel)
(provide 'mwheel)
-;; arch-tag: 50ed00e7-3686-4b7a-8037-fb31aa5c237f
;;; mwheel.el ends here
;;; mwheel.el ends here