From 42e1d5879b823083eae5e3da4b8b41e6e6b95394 Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Fri, 11 Apr 2008 02:31:43 +0000 Subject: [PATCH] (woman2-TH): Undo last change. Use string-equal instead of string-match. --- lisp/woman.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/lisp/woman.el b/lisp/woman.el index 01e4f223656..eca447d07bb 100644 --- a/lisp/woman.el +++ b/lisp/woman.el @@ -3810,8 +3810,7 @@ v alters page foot left; m alters page head center. (insert " -- ") (woman-forward-arg 'unquote 'concat) ;; Delete repeated arguments: - (if (string-match (regexp-quote - (buffer-substring here (point))) + (if (string-equal (buffer-substring here (point)) (buffer-substring start here)) (delete-region here (point))))) ;; Embolden heading (point is at end of heading): -- 2.39.2