diff options
author | Lars Ingebrigtsen <larsi@gnus.org> | 2020-08-11 18:46:34 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2020-08-11 21:04:12 +0200 |
commit | 672bfdb9c91629f232435ca4a2157bb3e627df9d (patch) | |
tree | 7fd34d7ea6bf3f98b05dd67eac4e5e417abf59ba /lisp/calc | |
parent | ccb5556b44f10124c7dd6c230a6d817fa83b9690 (diff) | |
download | emacs-672bfdb9c91629f232435ca4a2157bb3e627df9d.tar.gz |
Slight cleanup in calc-yank
* lisp/calc/calc-yank.el (calc-yank): Remove compat code.
Diffstat (limited to 'lisp/calc')
-rw-r--r-- | lisp/calc/calc-yank.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/calc/calc-yank.el b/lisp/calc/calc-yank.el index b119f149801..690aaf2687f 100644 --- a/lisp/calc/calc-yank.el +++ b/lisp/calc/calc-yank.el @@ -244,9 +244,7 @@ If RADIX is nil or if the yanked string already has a calc radix prefix, the yanked string will be passed on directly to the Calculator buffer without any alteration." (interactive "P") - (calc-yank-internal radix (if (fboundp 'current-kill) - (current-kill 0 t) - (car kill-ring-yank-pointer)))) + (calc-yank-internal radix (current-kill 0 t))) ;;; The Calc set- and get-register commands are modified versions of functions ;;; in register.el |