# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1132179107 0
# Node ID 1a91d22170868c3485ea51e8a3c38da262daec99
# Parent  bb91429003e2d162ce94b498a7ce5cb4f5ed66bd
(apropos-calc-scores): Use apropos-pattern.

diff -r bb91429003e2 -r 1a91d2217086 lisp/apropos.el
--- a/lisp/apropos.el	Wed Nov 16 19:05:38 2005 +0000
+++ b/lisp/apropos.el	Wed Nov 16 22:11:47 2005 +0000
@@ -341,7 +341,7 @@
 	  (if (setq i (string-match word str))
 	      (setq scores (cons i scores))))
       ;; Return list of start and end position of regexp
-      (and (string-match apropos-regexp str)
+      (and (string-match apropos-pattern str)
 	   (list (match-beginning 0) (match-end 0))))))
 
 (defun apropos-score-str (str)