Function: apropos-score-symbol

apropos-score-symbol is a byte-compiled function defined in apropos.el.gz.

Signature

(apropos-score-symbol SYMBOL &optional WEIGHT)

Documentation

Return apropos score for SYMBOL.

Source Code

;; Defined in /usr/src/emacs/lisp/apropos.el.gz
(defun apropos-score-symbol (symbol &optional weight)
  "Return apropos score for SYMBOL."
  (setq symbol (symbol-name symbol))
  (let ((score 0)
	(l (length symbol)))
    (dolist (s (apropos-calc-scores symbol apropos-words) (* score (or weight 3)))
      (setq score (+ score (- 60 l) (/ (* (- l s) 60) l))))))