emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/paredit 25e444c 056/224: Omit optional argument `yank-hand


From: ELPA Syncer
Subject: [nongnu] elpa/paredit 25e444c 056/224: Omit optional argument `yank-handler' in `paredit-kill-region'.
Date: Sat, 7 Aug 2021 09:22:18 -0400 (EDT)

branch: elpa/paredit
commit 25e444c7cd225f7629d57267d16fc620737a5a21
Author: Taylor R Campbell <campbell@mumble.net>
Commit: Taylor R Campbell <campbell@mumble.net>

    Omit optional argument `yank-handler' in `paredit-kill-region'.
    
    Ignore-this: d406778b8c6c314badf584b4cbcde099
    
    This appears to have been a GNU Emacs 22ism, which I don't use
    anyway.
    
    darcs-hash:20101205174822-00fcc-532684fb73397075e9d93ed7f35bebfe6b15c3f5
---
 paredit.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/paredit.el b/paredit.el
index f51d24e..9c2ed24 100644
--- a/paredit.el
+++ b/paredit.el
@@ -1611,7 +1611,7 @@ With a prefix argument, disregard any imbalance."
   (setq this-command 'kill-ring-save)
   (kill-ring-save beginning end))
 
-(defun paredit-kill-region (beginning end &optional yank-handler)
+(defun paredit-kill-region (beginning end)
   "Kill balanced text between point and mark, like `kill-region'.
 If that text is imbalanced, signal an error instead."
   (interactive "r")
@@ -1624,7 +1624,7 @@ If that text is imbalanced, signal an error instead."
                (state* (parse-partial-sexp beginning end nil nil state)))
           (paredit-check-region-state state state*))))
   (setq this-command 'kill-region)
-  (kill-region beginning end yank-handler))
+  (kill-region beginning end))
 
 (defun paredit-check-region-state (beginning-state end-state)
   (paredit-check-region-state-depth beginning-state end-state)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]