Mercurial > emacs

changeset 8228:9c7a3c5f887d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Delete debugging lines from previous change.
author Richard M. Stallman <rms@gnu.org>
date Tue, 12 Jul 1994 22:32:58 +0000
parents 0e6b7eeedc3b
children e772982a087b
files lisp/mouse-sel.el
diffstat 1 files changed, 0 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mouse-sel.el	Tue Jul 12 21:03:03 1994 +0000
+++ b/lisp/mouse-sel.el	Tue Jul 12 22:32:58 1994 +0000
@@ -248,7 +248,6 @@
   (setq mouse-sel-selection-type
 	(mouse-sel-determine-selection-type (event-click-count EVENT)))
   (let ((object-bounds (bounds-of-thing-at-point mouse-sel-selection-type)))
-    (setq foo object-bounds)
     (if object-bounds
 	(progn
 	  (setq mark-active t)
@@ -334,7 +333,6 @@
 		 (t (goto-char (posn-point end)))
 
 		 )
-		(setq foo1 (cons (list min max (point)) foo1))
 		;; Determine direction of drag
 		(cond
 		 ((and (not direction) (not (eq min max)))