branch: elpa/paredit
commit 4fdd1b73a712a194bc0e7de401aa3e6c16df719e
Author: Taylor R Campbell <[email protected]>
Commit: Taylor R Campbell <[email protected]>

    In test.el, use (delete-char -1), not backward-delete-char.
    
    @#&!#!&* GNU Emacs 24 changed the semantics of `backward-delete-char'
    so that it deletes the region in transient mark mode.  The rest of
    paredit will need to be changed to reflect this too -- argh.
---
 test.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/test.el b/test.el
index c610ba4..eb7ef04 100644
--- a/test.el
+++ b/test.el
@@ -42,10 +42,10 @@ Four arguments: the paredit command, the text of the buffer
           (insert before)
           (goto-char (point-min))
           (if (search-forward "_" nil t)
-              (progn (backward-delete-char +1) (set-mark (point))))
+              (progn (delete-char -1) (set-mark (point))))
           (goto-char (point-min))
           (search-forward "|")
-          (backward-delete-char +1)
+          (delete-char -1)
           (if (cond ((eq expected 'error)
                      ;++ Check that there are no more expected states.
                      (condition-case condition

Reply via email to