Mercurial > emacs
comparison lisp/emulation/cua-base.el @ 86326:4b0440ce239b
(x-clipboard-yank): Declare as function.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Thu, 22 Nov 2007 13:53:04 +0000 |
| parents | 79412c640bdf |
| children | 605b05ee020f |
comparison
equal
deleted
inserted
replaced
| 86325:613267d53431 | 86326:4b0440ce239b |
|---|---|
| 871 (interactive) | 871 (interactive) |
| 872 (setq mark-active nil) | 872 (setq mark-active nil) |
| 873 (setq cua--explicit-region-start nil) | 873 (setq cua--explicit-region-start nil) |
| 874 (if (fboundp 'cua--cancel-rectangle) | 874 (if (fboundp 'cua--cancel-rectangle) |
| 875 (cua--cancel-rectangle))) | 875 (cua--cancel-rectangle))) |
| 876 | |
| 877 (declare-function x-clipboard-yank "term/x-win" ()) | |
| 876 | 878 |
| 877 (defun cua-paste (arg) | 879 (defun cua-paste (arg) |
| 878 "Paste last cut or copied region or rectangle. | 880 "Paste last cut or copied region or rectangle. |
| 879 An active region is deleted before executing the command. | 881 An active region is deleted before executing the command. |
| 880 With numeric prefix arg, paste from register 0-9 instead. | 882 With numeric prefix arg, paste from register 0-9 instead. |