[Emacs-diffs] Changes to emacs/lisp/emulation/cua-base.el,v

[Juri Linkov]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Juri Linkov <jurta>     07/10/06 22:19:49

Index: cua-base.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/emulation/cua-base.el,v
retrieving revision 1.83
retrieving revision 1.84
diff -u -b -r1.83 -r1.84
--- cua-base.el 29 Aug 2007 05:28:10 -0000      1.83
+++ cua-base.el 6 Oct 2007 22:19:49 -0000       1.84
@@ -911,6 +911,7 @@
            ;; That would make yank a no-op.
            (if (and (string= (filter-buffer-substring (point) (mark))
                              (car kill-ring))
+                    (fboundp 'mouse-region-match)
                     (mouse-region-match))
                (current-kill 1))
            (cua-delete-region)))