Lines Matching refs:pattern
103 for the pattern; the part that matches gets displayed in this font."
141 (defvar apropos-pattern nil
142 "Apropos pattern as entered by user.")
144 (defvar apropos-pattern-quoted nil
145 "Apropos pattern passed through `regexp-quote'.")
148 "Current list of apropos words extracted from `apropos-pattern'.")
291 (defun apropos-read-pattern (subject)
292 "Read an apropos pattern, either a word list or a regexp.
293 Returns the user pattern, either a list of words which are matched
298 (let ((pattern
300 (if (string-equal (regexp-quote pattern) pattern)
302 (split-string pattern "[ \t]+")
303 pattern)))
305 (defun apropos-parse-pattern (pattern)
308 This updates variables `apropos-pattern', `apropos-pattern-quoted',
312 (if (consp pattern)
318 (let ((words pattern))
319 (setq apropos-pattern (mapconcat 'identity pattern " ")
320 apropos-pattern-quoted (regexp-quote apropos-pattern))
337 (setq apropos-pattern-quoted (regexp-quote pattern)
338 apropos-all-words-regexp pattern
339 apropos-pattern pattern
340 apropos-regexp pattern)))
352 (and (string-match apropos-pattern str)
369 (when (setq i (string-match apropos-pattern-quoted doc))
410 (defun apropos-variable (pattern &optional do-all)
419 (interactive (list (apropos-read-pattern
423 (apropos-command pattern nil
434 (defun apropos-command (pattern &optional do-all var-predicate)
449 (interactive (list (apropos-read-pattern
453 (apropos-parse-pattern pattern)
507 (defun apropos (pattern &optional do-all)
521 (interactive (list (apropos-read-pattern "symbol")
523 (apropos-parse-pattern pattern)
580 (defun apropos-value (pattern &optional do-all)
590 (interactive (list (apropos-read-pattern "value")
592 (apropos-parse-pattern pattern)
600 apropos-pattern apropos-all-words-regexp
625 (defun apropos-documentation (pattern &optional do-all)
636 (interactive (list (apropos-read-pattern "documentation")
638 (apropos-parse-pattern pattern)
700 (if (or (string-match apropos-pattern-quoted doc)
762 (if (or (string-match apropos-pattern-quoted doc)
816 (if (or (string-match apropos-pattern-quoted doc)
862 (message "No apropos matches for `%s'" apropos-pattern)