]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix outline byte compilation warning from previous change
authorLars Ingebrigtsen <larsi@gnus.org>
Fri, 29 Jul 2022 11:21:45 +0000 (13:21 +0200)
committerLars Ingebrigtsen <larsi@gnus.org>
Fri, 29 Jul 2022 11:21:45 +0000 (13:21 +0200)
* lisp/outline.el (outline--use-buttons-p): Move around to fix
byte compilation warning.

lisp/outline.el

index b7935551dbbd640ede22f48cb59d229c21aa414a..6ec7d95d3a18a6c502aaba0d04eab8a1fbe0696c 100644 (file)
@@ -438,13 +438,6 @@ outline font-lock faces to those of major mode."
             (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.
@@ -482,6 +475,13 @@ See the command `outline-mode' for more information on this 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).