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 | |
| 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
| -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) | 
