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

[Kim F. Storm]

Index: emacs/lisp/emulation/cua-base.el
diff -c emacs/lisp/emulation/cua-base.el:1.14 
emacs/lisp/emulation/cua-base.el:1.15
*** emacs/lisp/emulation/cua-base.el:1.14       Sun Oct  6 17:34:07 2002
--- emacs/lisp/emulation/cua-base.el    Fri Jan  3 08:00:08 2003
***************
*** 977,988 ****
                             'cua-copy-region))
                          ((eq ds 'supersede)
                           (if cua--rectangle
!                              'cua-delete-rectangle ;; replace?
!                            'cua-replace-region))
                          (t
                           (if cua--rectangle
!                              'cua-delete-rectangle
!                            'cua-delete-region)))))
                (if nc
                    (setq this-original-command this-command
                          this-command nc)))))
--- 977,988 ----
                             'cua-copy-region))
                          ((eq ds 'supersede)
                           (if cua--rectangle
!                              'cua-delete-rectangle
!                            'cua-delete-region))
                          (t
                           (if cua--rectangle
!                              'cua-delete-rectangle ;; replace?
!                            'cua-replace-region)))))
                (if nc
                    (setq this-original-command this-command
                          this-command nc)))))