diff options
| author | Karoly Lorentey | 2006-03-22 15:16:06 +0000 |
|---|---|---|
| committer | Karoly Lorentey | 2006-03-22 15:16:06 +0000 |
| commit | d4717700cc0b7af6197c19e22bd912e3b1ed67ee (patch) | |
| tree | 4e2a630584b23f670aff57a512a8f2d8182e39c4 /lisp/emulation | |
| parent | f1be5774242454844bf21fbf32e0f6541e2add34 (diff) | |
| parent | d63cd76657e12b92a5d7736a15bc9b97a7f9990e (diff) | |
| download | emacs-d4717700cc0b7af6197c19e22bd912e3b1ed67ee.tar.gz emacs-d4717700cc0b7af6197c19e22bd912e3b1ed67ee.zip | |
Merged from emacs@sv.gnu.org
Patches applied:
* emacs@sv.gnu.org/emacs--devo--0--patch-160
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-161
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-162
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-163
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/emacs--devo--0--patch-164
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-165
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-166
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-167
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-168
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-169
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-170
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/emacs--devo--0--patch-171
Update from CVS: man/mh-e.texi (Folders): Various edits.
* emacs@sv.gnu.org/emacs--devo--0--patch-172
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-58
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-59
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-60
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-61
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-62
Merge from emacs--devo--0
* emacs@sv.gnu.org/gnus--rel--5.10--patch-63
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-64
Update from CVS
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-534
Diffstat (limited to 'lisp/emulation')
| -rw-r--r-- | lisp/emulation/cua-rect.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/emulation/cua-rect.el b/lisp/emulation/cua-rect.el index 120866e7925..33b38552595 100644 --- a/lisp/emulation/cua-rect.el +++ b/lisp/emulation/cua-rect.el | |||
| @@ -799,8 +799,8 @@ If command is repeated at same position, delete the rectangle." | |||
| 799 | (if cua--virtual-edges-debug ?, ?\s)) | 799 | (if cua--virtual-edges-debug ?, ?\s)) |
| 800 | 'face rface)) | 800 | 'face rface)) |
| 801 | (if (cua--rectangle-right-side) | 801 | (if (cua--rectangle-right-side) |
| 802 | (put-text-property (1- (length ms)) (length ms) 'cursor t ms) | 802 | (put-text-property (1- (length ms)) (length ms) 'cursor 2 ms) |
| 803 | (put-text-property 0 1 'cursor t ms)) | 803 | (put-text-property 0 1 'cursor 2 ms)) |
| 804 | (setq bs (concat bs ms)) | 804 | (setq bs (concat bs ms)) |
| 805 | (setq rface nil)) | 805 | (setq rface nil)) |
| 806 | (t | 806 | (t |
| @@ -810,8 +810,8 @@ If command is repeated at same position, delete the rectangle." | |||
| 810 | (if cua--virtual-edges-debug ?~ ?\s)) | 810 | (if cua--virtual-edges-debug ?~ ?\s)) |
| 811 | 'face rface)) | 811 | 'face rface)) |
| 812 | (if (cua--rectangle-right-side) | 812 | (if (cua--rectangle-right-side) |
| 813 | (put-text-property (1- (length as)) (length as) 'cursor t as) | 813 | (put-text-property (1- (length as)) (length as) 'cursor 2 as) |
| 814 | (put-text-property 0 1 'cursor t as)) | 814 | (put-text-property 0 1 'cursor 2 as)) |
| 815 | (if (/= pr le) | 815 | (if (/= pr le) |
| 816 | (setq e (1- e)))))))) | 816 | (setq e (1- e)))))))) |
| 817 | ;; Trim old leading overlays. | 817 | ;; Trim old leading overlays. |