summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--test.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/test.el b/test.el
index 1c4d957..1136c55 100644
--- a/test.el
+++ b/test.el
@@ -42,6 +42,9 @@ Four arguments: the paredit command, the text of the buffer
(set (make-local-variable 'comment-column) 40)
(insert before)
(goto-char (point-min))
+ (if (search-forward "_" nil t)
+ (progn (backward-delete-char +1) (set-mark (point))))
+ (goto-char (point-min))
(search-forward "|")
(backward-delete-char +1)
(if (cond ((eq expected 'error)