diff options
author | Juri Linkov <juri@jurta.org> | 2007-10-06 22:19:12 +0000 |
---|---|---|
committer | Juri Linkov <juri@jurta.org> | 2007-10-06 22:19:12 +0000 |
commit | 614a773aa3754defa69dec18cd590f77b94c079e (patch) | |
tree | 3f53a11689f8a71b065baa2b3062722547179a90 /lisp/delsel.el | |
parent | 28681e350ccd92660d2b1be048e49e3e1d049e5d (diff) |
(delete-selection-pre-hook): Check if mouse-region-match is fbound
to not fail on mouseless tty.
Diffstat (limited to 'lisp/delsel.el')
-rw-r--r-- | lisp/delsel.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/delsel.el b/lisp/delsel.el index b4ae7965a3..8259398565 100644 --- a/lisp/delsel.el +++ b/lisp/delsel.el @@ -93,6 +93,7 @@ any selection." ;; 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)) |