diff options
author | Taylor R Campbell <campbell@mumble.net> | 2010-12-05 17:48:22 +0000 |
---|---|---|
committer | Taylor R Campbell <campbell@mumble.net> | 2010-12-05 17:48:22 +0000 |
commit | 25e444c7cd225f7629d57267d16fc620737a5a21 (patch) | |
tree | 9f55b0ffb72d42bb2b94aefa199d3ece3a327c82 /paredit.el | |
parent | b51f220aa8d21011b6eab253e4593c372c4ef8ee (diff) |
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
Diffstat (limited to 'paredit.el')
-rw-r--r-- | paredit.el | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -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) |