diff options
| author | Jim Blandy <jimb@redhat.com> | 1992-06-10 02:47:07 +0000 |
|---|---|---|
| committer | Jim Blandy <jimb@redhat.com> | 1992-06-10 02:47:07 +0000 |
| commit | 492878e483c355e6851d72cb4e395f069cd02964 (patch) | |
| tree | 2baa750cf47f09df16d5c89e719e4c81e23d67ca /lisp/sun-fns.el | |
| parent | 4de86b16296516788a3c65d98b13464c4462549a (diff) | |
| download | emacs-492878e483c355e6851d72cb4e395f069cd02964.tar.gz | |
*** empty log message ***
Diffstat (limited to 'lisp/sun-fns.el')
| -rw-r--r-- | lisp/sun-fns.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/sun-fns.el b/lisp/sun-fns.el index 00fbcc4715a..95ed1ed50b3 100644 --- a/lisp/sun-fns.el +++ b/lisp/sun-fns.el @@ -231,8 +231,7 @@ See mouse-mark-thing for a description of the objects recognized." (if (eq last-command 'yank) (let ((before (< (point) (mark)))) (delete-region (point) (mark)) - (rotate-yank-pointer 1) - (insert (car kill-ring-yank-pointer)) + (insert (current-kill 1)) (if before (exchange-point-and-mark))) (yank)) (setq this-command 'yank)) |