1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 20:32:00 -08:00

(cua--pre-command-handler): Corrected

handling of delete-selection properties.
This commit is contained in:
Kim F. Storm 2003-01-03 13:00:08 +00:00
parent 821adeae4e
commit ad9de65b54

View file

@ -977,12 +977,12 @@ Extra commands should be added to `cua-user-movement-commands'")
'cua-copy-region))
((eq ds 'supersede)
(if cua--rectangle
'cua-delete-rectangle ;; replace?
'cua-replace-region))
'cua-delete-rectangle
'cua-delete-region))
(t
(if cua--rectangle
'cua-delete-rectangle
'cua-delete-region)))))
'cua-delete-rectangle ;; replace?
'cua-replace-region)))))
(if nc
(setq this-original-command this-command
this-command nc)))))