# HG changeset patch # User Richard M. Stallman # Date 821682769 0 # Node ID 7db5b89b78b6f2862a1a354ba7dd2419dda588dc # Parent 4c8fdbefbb582c7c3fe29380418da06c769a01f6 (mouse-drag-region, mouse-drag-secondary): Bind echo-keystrokes to 0. diff -r 4c8fdbefbb58 -r 7db5b89b78b6 lisp/mouse.el --- a/lisp/mouse.el Mon Jan 15 05:11:43 1996 +0000 +++ b/lisp/mouse.el Mon Jan 15 05:12:49 1996 +0000 @@ -18,8 +18,9 @@ ;; GNU General Public License for more details. ;; You should have received a copy of the GNU General Public License -;; along with GNU Emacs; see the file COPYING. If not, write to -;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. +;; along with GNU Emacs; see the file COPYING. If not, write to the +;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, +;; Boston, MA 02111-1307, USA. ;;; Commentary: @@ -488,7 +489,8 @@ release the mouse button. Otherwise, it does not." (interactive "e") (mouse-minibuffer-check start-event) - (let* ((start-posn (event-start start-event)) + (let* ((echo-keystrokes 0) + (start-posn (event-start start-event)) (start-point (posn-point start-posn)) (start-window (posn-window start-posn)) (start-frame (window-frame start-window)) @@ -916,7 +918,8 @@ This must be bound to a button-down mouse event." (interactive "e") (mouse-minibuffer-check start-event) - (let* ((start-posn (event-start start-event)) + (let* ((echo-keystrokes 0) + (start-posn (event-start start-event)) (start-point (posn-point start-posn)) (start-window (posn-window start-posn)) (start-frame (window-frame start-window))