changeset 85073:6ae29c2dfff0

(delete-selection-pre-hook): Check if mouse-region-match is fbound to not fail on mouseless tty.
author Juri Linkov <juri@jurta.org>
date Sat, 06 Oct 2007 22:19:12 +0000
parents c27859b68484
children 16efb39cdb2e
files lisp/delsel.el
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/delsel.el	Sat Oct 06 22:17:49 2007 +0000
+++ b/lisp/delsel.el	Sat Oct 06 22:19:12 2007 +0000
@@ -93,6 +93,7 @@
 		 ;; That would make yank a no-op.
 		 (when (and (string= (buffer-substring-no-properties (point) (mark))
 				     (car kill-ring))
+			    (fboundp 'mouse-region-match)
 			    (mouse-region-match))
 		   (current-kill 1))
 		 (delete-active-region))