* lisp/mouse.el (mouse-drag-track): Always deactivate the mark before

running the final event's command since that command is in charge of
activating the mark if needed.

Fixes: debbugs:13523

lisp/ChangeLog

+2013-02-01  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* mouse.el (mouse-drag-track): Always deactivate the mark before
+	running the final event's command since that command is in charge of
+	activating the mark if needed (bug#13523).
+
 2013-02-01  Juri Linkov  <juri@jurta.org>
 	* replace.el (perform-replace): Move let-bindings of isearch-*

lisp/mouse.el

@@ -880,9 +880,9 @@ DO-MOUSE-DRAG-REGION-POST-PROCESS should only be used by
 		     (copy-region-as-kill (mark) (point)))))
 
 	  ;; Otherwise, run binding of terminating up-event.
+          (deactivate-mark)
 	  (if do-multi-click
 	      (goto-char start-point)
-	    (deactivate-mark)
 	    (unless moved-off-start
 	      (pop-mark)))