diff options
| author | Stefan Monnier | 2013-03-09 12:14:24 -0500 |
|---|---|---|
| committer | Stefan Monnier | 2013-03-09 12:14:24 -0500 |
| commit | 74dd4abc5fb5ba21cdb3715b1d1d68bf27618b60 (patch) | |
| tree | 4dcb3d196b4315564253db1ccee82a3599718cd7 | |
| parent | 3675b1698d0a3a5a8ee09354f2d15e233de8cece (diff) | |
| download | emacs-74dd4abc5fb5ba21cdb3715b1d1d68bf27618b60.tar.gz emacs-74dd4abc5fb5ba21cdb3715b1d1d68bf27618b60.zip | |
* lisp/mouse.el (mouse-drag-track): Remove left-over debugging code.
| -rw-r--r-- | lisp/ChangeLog | 10 | ||||
| -rw-r--r-- | lisp/mouse.el | 1 |
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 @@ | |||
| 1 | 2013-03-09 Stefan Monnier <monnier@iro.umontreal.ca> | ||
| 2 | |||
| 3 | * mouse.el (mouse-drag-track): Remove left-over debugging code. | ||
| 4 | |||
| 1 | 2013-03-09 Michael Albinus <michael.albinus@gmx.de> | 5 | 2013-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)) |