Mercurial > emacs

diff lisp/woman.el @ 80496:187891075439

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(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):