Lines Matching defs:regexp
157 "*All headers that start with this regexp will be hidden.
161 regexp
162 (repeat regexp))
167 "*All headers that do not match this regexp will be hidden.
168 This variable can also be a list of regexp of headers to remain visible.
171 (custom-split-regexp-maybe value))
175 regexp)
185 :type '(repeat regexp)
230 (regexp)
231 (repeat :tag "List of regexp" regexp))
241 regexp. If it matches, the text in question is not a signature."
246 (regexp :value ".*"))
278 :type '(choice regexp (const nil))
286 :type '(repeat (cons symbol regexp))
299 regexp
312 Each element has the form (ADDRESS . BANNER), where ADDRESS is a regexp
314 `signature', an item in `gnus-article-banner-alist', a regexp and nil.
322 (regexp :tag "Address")
326 regexp
348 (let ((regexp (concat "\\`"
349 (format (regexp-quote format)
353 (if (string-match regexp (setq pattern (car value)))
392 regexp grouping should be displayed and highlighted. The fourth
413 regexp
420 (regexp :format "Start regexp: %v")
421 (regexp :format "End regexp: %v"))
433 (defcustom gnus-emphasize-whitespace-regexp "^[ \t]+\\|[ \t]*\n"
434 "A regexp to describe whitespace which should not be emphasized.
440 :type 'regexp)
518 If that variable is nil, however, all headers that match this regexp
524 :type 'regexp)
651 If the match is a string, it is used as a regexp match on the
661 (cons :value ("" "") regexp (repeat string))
668 :type 'regexp
833 :type '(repeat (list (regexp :tag "Header")
885 :type '(repeat regexp))
893 :type '(repeat regexp))
905 :type '(repeat regexp))
1015 (repeat :tag "Groups" regexp)
2602 (let ((w3m-safe-url-regexp mm-w3m-safe-url-regexp)
2636 (regexp (if (consp gnus-list-identifiers)
2640 (when regexp
2646 (concat "^Subject: +\\(R[Ee]: +\\)*\\(" regexp " *\\)")
2982 (let* ((tdate-regexp "^Date:[ \t]\\|^X-Sent:[ \t]")
2983 (date-regexp (cond ((not gnus-article-date-lapsed-new-header)
2984 tdate-regexp)
2990 tdate-regexp)))
3009 (when (re-search-forward tdate-regexp nil t)
3015 (while (re-search-forward date-regexp nil t)
3028 (re-search-forward tdate-regexp nil t))
3284 regexp elem beg invisible visible face)
3289 (setq regexp (car elem)
3293 (while (re-search-forward regexp nil t)
3939 ;; Internal variables. Are `gnus-button-regexp' and `gnus-button-last' used
3941 (defvar gnus-button-regexp nil)
3945 "The value of `gnus-button-alist' when `gnus-button-regexp' was build.")
6173 (search-forward-regexp "^$" nil t)
6175 (query-replace-regexp "\\([.!?][])}]* \\)\\([[({A-Z]\\)" "\\1 \\2"))))
6185 (defcustom gnus-button-url-regexp
6191 :type 'regexp)
6193 (defcustom gnus-button-valid-fqdn-regexp
6194 message-valid-fqdn-regexp
6198 :type 'regexp)
6201 (defcustom gnus-button-valid-localpart-regexp
6206 :type 'regexp)
6239 (defcustom gnus-button-handle-ctan-bogus-regexp "^/?tex-archive/\\|^/"
6244 (regexp :tag "Other")))
6246 (defcustom gnus-button-ctan-directory-regexp
6247 (regexp-opt
6256 :type 'regexp)
6258 (defcustom gnus-button-mid-or-mail-regexp
6259 (concat "\\b\\(<?" gnus-button-valid-localpart-regexp "@"
6260 gnus-button-valid-fqdn-regexp
6265 :type 'regexp)
6342 (regexp :tag "Regexp"))))
6350 (result 0) rate regexp lpartlen elem)
6371 regexp (cdr elem)
6373 (when (string-match regexp mid-or-mail)
6377 mid-or-mail regexp rate result)))
6515 (gnus-replace-in-string url gnus-button-handle-ctan-bogus-regexp ""))))
6575 gnus-button-valid-localpart-regexp "@[a-z0-9.-]+[a-z]\\)")
6595 gnus-button-ctan-directory-regexp
6599 gnus-button-ctan-directory-regexp
6604 gnus-button-ctan-directory-regexp
6628 ;; regexp doesn't match arguments containing ` '.
6669 (gnus-button-url-regexp
6688 (gnus-button-mid-or-mail-regexp
6695 BUTTON: is the number of the regexp grouping actually matching the button,
6699 PAR: is a number of a regexp grouping whose text will be passed to CALLBACK.
6704 :type '(repeat (list (choice regexp variable sexp)
6719 ("^X-[Uu][Rr][Ll]:" gnus-button-url-regexp
6721 ("^Subject:" gnus-button-url-regexp
6723 ("^[^:]+:" gnus-button-url-regexp
6736 HEADER is a regexp to match a header. For a fuller explanation, see
6740 :type '(repeat (list (regexp :tag "Header")
6741 (choice regexp variable)
6807 entry regexp header-face field-face from hpoints fpoints)
6811 (setq regexp (concat "^\\("
6818 (while (and (re-search-forward regexp nil t)
6872 beg entry regexp)
6889 (setq regexp (eval (car entry)))
6891 (while (re-search-forward regexp nil t)