Function: occur-regexp-descr
occur-regexp-descr is a byte-compiled function defined in
replace.el.gz.
Signature
(occur-regexp-descr REGEXP)
Source Code
;; Defined in /usr/src/emacs/lisp/replace.el.gz
(defun occur-regexp-descr (regexp)
(format " for %s\"%s\""
(or (get-text-property 0 'isearch-regexp-function-descr regexp)
"")
(if (get-text-property 0 'isearch-string regexp)
(propertize
(query-replace-descr
(get-text-property 0 'isearch-string regexp))
'help-echo regexp)
(query-replace-descr regexp))))