diff options
| author | Richard M. Stallman | 2005-11-16 22:11:47 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2005-11-16 22:11:47 +0000 |
| commit | 347a20b867cfdacf26552c4771348aab45d5770f (patch) | |
| tree | 7fc7a5d3e85fe7b91864631a30cd741612d57d85 | |
| parent | 77f05e24e88e65102b32d0c881fbb633ef64f1c8 (diff) | |
| download | emacs-347a20b867cfdacf26552c4771348aab45d5770f.tar.gz emacs-347a20b867cfdacf26552c4771348aab45d5770f.zip | |
(apropos-calc-scores): Use apropos-pattern.
| -rw-r--r-- | lisp/apropos.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/apropos.el b/lisp/apropos.el index 5f2ed106e0e..5eda7567ef0 100644 --- a/lisp/apropos.el +++ b/lisp/apropos.el | |||
| @@ -341,7 +341,7 @@ Value is a list of offsets of the words into the string." | |||
| 341 | (if (setq i (string-match word str)) | 341 | (if (setq i (string-match word str)) |
| 342 | (setq scores (cons i scores)))) | 342 | (setq scores (cons i scores)))) |
| 343 | ;; Return list of start and end position of regexp | 343 | ;; Return list of start and end position of regexp |
| 344 | (and (string-match apropos-regexp str) | 344 | (and (string-match apropos-pattern str) |
| 345 | (list (match-beginning 0) (match-end 0)))))) | 345 | (list (match-beginning 0) (match-end 0)))))) |
| 346 | 346 | ||
| 347 | (defun apropos-score-str (str) | 347 | (defun apropos-score-str (str) |