[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/xt-mouse.el,v
From: |
Nick Roberts |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/xt-mouse.el,v |
Date: |
Sat, 12 May 2007 09:39:06 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Nick Roberts <nickrob> 07/05/12 09:39:06
Index: xt-mouse.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/xt-mouse.el,v
retrieving revision 1.39
retrieving revision 1.40
diff -u -b -r1.39 -r1.40
--- xt-mouse.el 3 Apr 2007 21:16:17 -0000 1.39
+++ xt-mouse.el 12 May 2007 09:39:06 -0000 1.40
@@ -43,6 +43,8 @@
;;; Code:
+(defvar xterm-mouse-debug-buffer nil)
+
(define-key function-key-map "\e[M" 'xterm-mouse-translate)
(defvar xterm-mouse-last)
@@ -95,6 +97,8 @@
(list (intern (format "drag-mouse-%d"
(+ 1 xterm-mouse-last)))
down-data click-data)))))
+ (if xterm-mouse-debug-buffer
+ (print unread-command-events xterm-mouse-debug-buffer))
(if (and (symbolp down-where)
(consp down-where))
(vector (list down-where down-data) down)
- [Emacs-diffs] Changes to emacs/lisp/xt-mouse.el,v,
Nick Roberts <=