aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2013-03-09 12:14:24 -0500
committerStefan Monnier2013-03-09 12:14:24 -0500
commit74dd4abc5fb5ba21cdb3715b1d1d68bf27618b60 (patch)
tree4dcb3d196b4315564253db1ccee82a3599718cd7
parent3675b1698d0a3a5a8ee09354f2d15e233de8cece (diff)
downloademacs-74dd4abc5fb5ba21cdb3715b1d1d68bf27618b60.tar.gz
emacs-74dd4abc5fb5ba21cdb3715b1d1d68bf27618b60.zip
* lisp/mouse.el (mouse-drag-track): Remove left-over debugging code.
-rw-r--r--lisp/ChangeLog10
-rw-r--r--lisp/mouse.el1
2 files changed, 7 insertions, 4 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 41d5a4ed0d0..df4cf561588 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
12013-03-09 Stefan Monnier <monnier@iro.umontreal.ca>
2
3 * mouse.el (mouse-drag-track): Remove left-over debugging code.
4
12013-03-09 Michael Albinus <michael.albinus@gmx.de> 52013-03-09 Michael Albinus <michael.albinus@gmx.de>
2 6
3 Major rewrite due to changed D-Bus interface of GVFS 1.14. 7 Major rewrite due to changed D-Bus interface of GVFS 1.14.
@@ -6,9 +10,9 @@
6 (tramp-gvfs-methods-mounttracker, tramp-gvfs-listmounts) 10 (tramp-gvfs-methods-mounttracker, tramp-gvfs-listmounts)
7 (tramp-gvfs-mountlocation, tramp-gvfs-mountlocation-signature): 11 (tramp-gvfs-mountlocation, tramp-gvfs-mountlocation-signature):
8 New defconst. 12 New defconst.
9 (tramp-gvfs-file-name-handler-alist) [directory-files]: 13 (tramp-gvfs-file-name-handler-alist) [directory-files]
10 [directory-files-and-attributes, file-exists-p, file-modes]: Use 14 [directory-files-and-attributes, file-exists-p, file-modes]:
11 Tramp default handler. 15 Use Tramp default handler.
12 [file-acl, file-selinux-context, process-file, set-file-acl]: 16 [file-acl, file-selinux-context, process-file, set-file-acl]:
13 [set-file-modes, set-file-selinux-context, shell-command]: 17 [set-file-modes, set-file-selinux-context, shell-command]:
14 [start-file-process ]: Remove handler. 18 [start-file-process ]: Remove handler.
diff --git a/lisp/mouse.el b/lisp/mouse.el
index f820d3aa6d7..51601bca8df 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -850,7 +850,6 @@ DO-MOUSE-DRAG-REGION-POST-PROCESS should only be used by
850 (track-mouse 850 (track-mouse
851 (while (progn 851 (while (progn
852 (setq event (read-event)) 852 (setq event (read-event))
853 (trace-values event)
854 (or (mouse-movement-p event) 853 (or (mouse-movement-p event)
855 (memq (car-safe event) '(switch-frame select-window)))) 854 (memq (car-safe event) '(switch-frame select-window))))
856 (unless (memq (car-safe event) '(switch-frame select-window)) 855 (unless (memq (car-safe event) '(switch-frame select-window))