(outline--insert-open-button)))
(goto-char (match-end 0))))))
-(defun outline--use-buttons-p ()
- (and outline-minor-mode
- outline-minor-mode-use-buttons
- (or (eq outline-minor-mode-use-buttons t)
- (buffer-match-p outline-minor-mode-use-buttons
- (current-buffer)))))
-
;;;###autoload
(define-minor-mode outline-minor-mode
"Toggle Outline minor mode.
;; When turning off outline mode, get rid of any outline hiding.
(outline-show-all)))
+(defun outline--use-buttons-p ()
+ (and outline-minor-mode
+ outline-minor-mode-use-buttons
+ (or (eq outline-minor-mode-use-buttons t)
+ (buffer-match-p outline-minor-mode-use-buttons
+ (current-buffer)))))
+
(defvar-local outline-heading-alist ()
"Alist associating a heading for every possible level.
Each entry is of the form (HEADING . LEVEL).