# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1207881103 0
# Node ID 187891075439af0b1cc79d577ea31f7011c562d0
# Parent  cfc9673219ecbd2cfa4b53aec9618004af454e87
(woman2-TH): Undo last change.  Use string-equal instead of
string-match.

diff -r cfc9673219ec -r 187891075439 lisp/woman.el
--- 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):