Function: elisp-outline-search

elisp-outline-search is a byte-compiled function defined in elisp-mode.el.gz.

Signature

(elisp-outline-search &optional BOUND MOVE BACKWARD LOOKING-AT)

Documentation

Don't use leading parens in strings for outline headings.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/elisp-mode.el.gz
(defun elisp-outline-search (&optional bound move backward looking-at)
  "Don't use leading parens in strings for outline headings."
  (if looking-at
      (and (looking-at outline-regexp)
           (save-excursion (not (nth 8 (syntax-ppss (match-beginning 0))))))
    (let ((search-success nil))
      (while (and (setq search-success
                        (funcall (if backward #'re-search-backward
                                   #'re-search-forward)
                                 (concat "^\\(?:" outline-regexp "\\)")
                                 bound (if move 'move t)))
                  (save-excursion
                    (save-match-data
                      (nth 8 (syntax-ppss (match-beginning 0)))))))
      search-success)))