X-Git-Url: https://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fregistry.el;h=5a35e1f0e8d1ba697e0b93defa29fe15b79c7a38;hb=051d74319415a8e395c9985eb8cac587a1c709df;hp=13c1671855c11f4a45fec31098560f82d6dbed4d;hpb=4bfee81711b64e10808f8b1846818e29ef16cb94;p=gnus

diff --git a/lisp/registry.el b/lisp/registry.el
index 13c167185..5a35e1f0e 100644
--- a/lisp/registry.el
+++ b/lisp/registry.el
@@ -242,9 +242,9 @@ When SET is not nil, set it for VAL (use t for an empty list)."
 
 (defmethod registry-search ((db registry-db) &rest spec)
   "Search for SPEC across the registry-db THIS.
-For example calling with :member '(a 1 2) will match entry '((a 3 1)).
+For example calling with :member \\='(a 1 2) will match entry \\='((a 3 1)).
 Calling with :all t (any non-nil value) will match all.
-Calling with :regex '\(a \"h.llo\") will match entry '((a \"hullo\" \"bye\").
+Calling with :regex \\='\(a \"h.llo\") will match entry \\='((a \"hullo\" \"bye\").
 The test order is to check :all first, then :member, then :regex."
   (when db
     (let ((all (plist-get spec :all))