Mercurial > emacs
diff lisp/woman.el @ 80496:187891075439
(woman2-TH): Undo last change. Use string-equal instead of
string-match.
author | Chong Yidong <cyd@stupidchicken.com> |
---|---|
date | Fri, 11 Apr 2008 02:31:43 +0000 |
parents | 52eeccd048ad |
children |
line wrap: on
line diff
--- a/lisp/woman.el Fri Apr 11 02:31:26 2008 +0000 +++ b/lisp/woman.el Fri Apr 11 02:31:43 2008 +0000 @@ -3810,8 +3810,7 @@ (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):