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 | |
| parent | 28681e350ccd92660d2b1be048e49e3e1d049e5d (diff) | |
(delete-selection-pre-hook): Check if mouse-region-match is fbound
to not fail on mouseless tty.
| -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)) |