[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r112082: * mouse.el (mouse-on-link-p)
From: |
Jan D. |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r112082: * mouse.el (mouse-on-link-p): Check for scroll bar. |
Date: |
Mon, 18 Mar 2013 18:19:24 +0100 |
User-agent: |
Bazaar (2.5.0) |
------------------------------------------------------------
revno: 112082
fixes bug: http://debbugs.gnu.org/13979
committer: Jan D. <address@hidden>
branch nick: trunk
timestamp: Mon 2013-03-18 18:19:24 +0100
message:
* mouse.el (mouse-on-link-p): Check for scroll bar.
modified:
lisp/ChangeLog
lisp/mouse.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2013-03-18 13:04:13 +0000
+++ b/lisp/ChangeLog 2013-03-18 17:19:24 +0000
@@ -1,3 +1,7 @@
+2013-03-18 Jan Djärv <address@hidden>
+
+ * mouse.el (mouse-on-link-p): Check for scroll bar (Bug#13979).
+
2013-03-18 Michael Albinus <address@hidden>
* net/tramp-compat.el (tramp-compat-user-error): New defun.
=== modified file 'lisp/mouse.el'
--- a/lisp/mouse.el 2013-03-09 17:14:24 +0000
+++ b/lisp/mouse.el 2013-03-18 17:19:24 +0000
@@ -755,7 +755,8 @@
- Otherwise, the mouse-1 event is translated into a mouse-2 event
at the same position."
(let ((action
- (and (or (not (consp pos))
+ (and (not (memq 'vertical-scroll-bar pos))
+ (or (not (consp pos))
mouse-1-click-in-non-selected-windows
(eq (selected-window) (posn-window pos)))
(or (mouse-posn-property pos 'follow-link)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r112082: * mouse.el (mouse-on-link-p): Check for scroll bar.,
Jan D. <=