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 | c9efec0ec06f2211a9c17332e77e7632a90520a3 (patch) | |
| tree | 1e32f750877618723c2af744a3cd769f65b6d889 /lisp/sun-fns.el | |
| parent | 8a142e81f846537295e04eee527358f46c5ad88b (diff) | |
| download | emacs-c9efec0ec06f2211a9c17332e77e7632a90520a3.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)) |