# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1058219342 0
# Node ID 8604d171445a68581fe7b7351aa651a067398f40
# Parent  2a48b71ac770b0843520657f1b28ea374936eae7
(apropos-sort-by-scores): Rename from apropos-show-scores.
All uses changed.

diff -r 2a48b71ac770 -r 8604d171445a lisp/apropos.el
--- a/lisp/apropos.el	Mon Jul 14 21:48:18 2003 +0000
+++ b/lisp/apropos.el	Mon Jul 14 21:49:02 2003 +0000
@@ -102,8 +102,9 @@
   :group 'apropos
   :type 'face)
 
-(defcustom apropos-show-scores nil
-  "*Non-nil means show score for each match, and sort matches by scores."
+(defcustom apropos-sort-by-scores nil
+  "*Non-nil means sort matches by scores; best match is shown first.
+The computed score is shown for each match."
   :group 'apropos
   :type 'boolean)
 
@@ -771,7 +772,7 @@
 		(lambda (a b)
 		  ;; Don't sort by score if user can't see the score.
 		  ;; It would be confusing.  -- rms.
-		  (if apropos-show-scores
+		  (if apropos-sort-by-scores
 		      (or (> (cadr a) (cadr b))
 			  (and (= (cadr a) (cadr b))
 			       (string-lessp (car a) (car b))))
@@ -804,7 +805,7 @@
 			      ;; changed the variable!
 			      ;; Just say `no' to variables containing faces!
 			      'face apropos-symbol-face)
-	  (if apropos-show-scores
+	  (if apropos-sort-by-scores
 	      (insert " (" (number-to-string (cadr apropos-item)) ") "))
 	  ;; Calculate key-bindings if we want them.
 	  (and do-keys