summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/mouse-sel.el2
1 files changed, 0 insertions, 2 deletions
diff --git a/lisp/mouse-sel.el b/lisp/mouse-sel.el
index 112f7285663..092e1cae6b8 100644
--- a/lisp/mouse-sel.el
+++ b/lisp/mouse-sel.el
@@ -248,7 +248,6 @@ This should be bound to a down-mouse event."
(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 @@ This should be bound to a down-mouse event."
(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)))