diff options
| author | Taylor R Campbell <campbell@mumble.net> | 2013-06-13 15:03:14 +0000 | 
|---|---|---|
| committer | Taylor R Campbell <campbell@mumble.net> | 2013-06-13 15:03:16 +0000 | 
| commit | 4fdd1b73a712a194bc0e7de401aa3e6c16df719e (patch) | |
| tree | 84200300e4e30e84e0db7c19fbbc50e55eb9cd59 | |
| parent | 54317c848846eb8dfc8b7b7e4df4f49b027cd085 (diff) | |
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.
| -rw-r--r-- | test.el | 4 | 
1 files changed, 2 insertions, 2 deletions
| @@ -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 | 
