diff options
Diffstat (limited to 'lisp/emulation')
| -rw-r--r-- | lisp/emulation/cua-base.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/emulation/cua-base.el b/lisp/emulation/cua-base.el index 5e18953752a..fbb39ee66d3 100644 --- a/lisp/emulation/cua-base.el +++ b/lisp/emulation/cua-base.el | |||
| @@ -911,6 +911,7 @@ If global mark is active, copy from register or one character." | |||
| 911 | ;; That would make yank a no-op. | 911 | ;; That would make yank a no-op. |
| 912 | (if (and (string= (filter-buffer-substring (point) (mark)) | 912 | (if (and (string= (filter-buffer-substring (point) (mark)) |
| 913 | (car kill-ring)) | 913 | (car kill-ring)) |
| 914 | (fboundp 'mouse-region-match) | ||
| 914 | (mouse-region-match)) | 915 | (mouse-region-match)) |
| 915 | (current-kill 1)) | 916 | (current-kill 1)) |
| 916 | (cua-delete-region))) | 917 | (cua-delete-region))) |