From e439df7d27b9a04ece7e51c9fc0c7bfc0c2dfbf2 Mon Sep 17 00:00:00 2001 From: Andreas Gerler Date: Fri, 24 Apr 2026 18:54:18 +0200 Subject: [PATCH] update outline-minor-faces --- .../outline-minor-faces-autoloads.el | 46 ------------------- .../outline-minor-faces-autoloads.el | 0 .../outline-minor-faces-pkg.el | 10 ++-- .../outline-minor-faces.el | 26 +++++------ 4 files changed, 17 insertions(+), 65 deletions(-) delete mode 100644 elpa/outline-minor-faces-20250514.1243/outline-minor-faces-autoloads.el rename elpa/{outline-minor-faces-20241202.1859 => outline-minor-faces-20250901.1338}/outline-minor-faces-autoloads.el (100%) rename elpa/{outline-minor-faces-20250514.1243 => outline-minor-faces-20250901.1338}/outline-minor-faces-pkg.el (66%) rename elpa/{outline-minor-faces-20250514.1243 => outline-minor-faces-20250901.1338}/outline-minor-faces.el (93%) diff --git a/elpa/outline-minor-faces-20250514.1243/outline-minor-faces-autoloads.el b/elpa/outline-minor-faces-20250514.1243/outline-minor-faces-autoloads.el deleted file mode 100644 index b1b8d7f0..00000000 --- a/elpa/outline-minor-faces-20250514.1243/outline-minor-faces-autoloads.el +++ /dev/null @@ -1,46 +0,0 @@ -;;; outline-minor-faces-autoloads.el --- automatically extracted autoloads (do not edit) -*- lexical-binding: t -*- -;; Generated by the `loaddefs-generate' function. - -;; This file is part of GNU Emacs. - -;;; Code: - -(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path))) - - - -;;; Generated autoloads from outline-minor-faces.el - -(autoload 'outline-minor-faces-mode "outline-minor-faces" "\ -Minor mode that adds heading faces for `outline-minor-mode'. - -This is a minor mode. If called interactively, toggle the `Outline -minor-Faces mode' mode. If the prefix argument is positive, enable the -mode, and if it is zero or negative, disable the mode. - -If called from Lisp, toggle the mode if ARG is `toggle'. Enable the -mode if ARG is nil, omitted, or is a positive number. Disable the mode -if ARG is a negative number. - -To check whether the minor mode is enabled in the current buffer, -evaluate the variable `outline-minor-faces-mode'. - -The mode's hook is called both when the mode is enabled and when it is -disabled. - -(fn &optional ARG)" t) -(register-definition-prefixes "outline-minor-faces" '("outline-minor-faces")) - -;;; End of scraped data - -(provide 'outline-minor-faces-autoloads) - -;; Local Variables: -;; version-control: never -;; no-byte-compile: t -;; no-update-autoloads: t -;; no-native-compile: t -;; coding: utf-8-emacs-unix -;; End: - -;;; outline-minor-faces-autoloads.el ends here diff --git a/elpa/outline-minor-faces-20241202.1859/outline-minor-faces-autoloads.el b/elpa/outline-minor-faces-20250901.1338/outline-minor-faces-autoloads.el similarity index 100% rename from elpa/outline-minor-faces-20241202.1859/outline-minor-faces-autoloads.el rename to elpa/outline-minor-faces-20250901.1338/outline-minor-faces-autoloads.el diff --git a/elpa/outline-minor-faces-20250514.1243/outline-minor-faces-pkg.el b/elpa/outline-minor-faces-20250901.1338/outline-minor-faces-pkg.el similarity index 66% rename from elpa/outline-minor-faces-20250514.1243/outline-minor-faces-pkg.el rename to elpa/outline-minor-faces-20250901.1338/outline-minor-faces-pkg.el index e1793253..8c764936 100644 --- a/elpa/outline-minor-faces-20250514.1243/outline-minor-faces-pkg.el +++ b/elpa/outline-minor-faces-20250901.1338/outline-minor-faces-pkg.el @@ -1,11 +1,11 @@ ;; -*- no-byte-compile: t; lexical-binding: nil -*- -(define-package "outline-minor-faces" "20250514.1243" +(define-package "outline-minor-faces" "20250901.1338" "Highlight only section headings." - '((emacs "26.1") - (compat "30.0.1.0")) + '((emacs "27.1") + (compat "30.1")) :url "https://github.com/tarsius/outline-minor-faces" - :commit "a1ef3834f9f643cf1f65c5424691514169f8bf31" - :revdesc "a1ef3834f9f6" + :commit "2e7a99b07108e6cc34da16e33746c770a2c20f32" + :revdesc "2e7a99b07108" :keywords '("faces" "outlines") :authors '(("Jonas Bernoulli" . "emacs.outline-minor-faces@jonas.bernoulli.dev")) :maintainers '(("Jonas Bernoulli" . "emacs.outline-minor-faces@jonas.bernoulli.dev"))) diff --git a/elpa/outline-minor-faces-20250514.1243/outline-minor-faces.el b/elpa/outline-minor-faces-20250901.1338/outline-minor-faces.el similarity index 93% rename from elpa/outline-minor-faces-20250514.1243/outline-minor-faces.el rename to elpa/outline-minor-faces-20250901.1338/outline-minor-faces.el index c4280bda..1fd15a4c 100644 --- a/elpa/outline-minor-faces-20250514.1243/outline-minor-faces.el +++ b/elpa/outline-minor-faces-20250901.1338/outline-minor-faces.el @@ -6,9 +6,11 @@ ;; Homepage: https://github.com/tarsius/outline-minor-faces ;; Keywords: faces outlines -;; Package-Version: 20250514.1243 -;; Package-Revision: a1ef3834f9f6 -;; Package-Requires: ((emacs "26.1") (compat "30.0.1.0")) +;; Package-Version: 20250901.1338 +;; Package-Revision: 2e7a99b07108 +;; Package-Requires: ( +;; (emacs "27.1") +;; (compat "30.1")) ;; SPDX-License-Identifier: GPL-3.0-or-later @@ -58,12 +60,12 @@ (require 'outline) (defface outline-minor-0 - `((((class color) (background light)) - ,@(and (>= emacs-major-version 27) '(:extend t)) + '((((class color) (background light)) + :extend t :weight bold :background "light grey") (((class color) (background dark)) - ,@(and (>= emacs-major-version 27) '(:extend t)) + :extend t :weight bold :background "grey20")) "Face that other `outline-minor-N' faces inherit from." @@ -143,11 +145,11 @@ for those modes, and the matcher will not know what is/is not a string." (cond ;; Assume that if a mode defines such a function, it likely is - ;; benefitial to use it. We know that `elisp-outline-search' + ;; beneficial to use it. We know that `elisp-outline-search' ;; (added in Emacs 31) is unnecessary here though. It's purpose ;; is to avoid matching parens at the bol inside strings, but we ;; don't even try to match parens at all, so that's not relevant. - ((and outline-search-function + ((and (bound-and-true-p outline-search-function) (not (eq outline-search-function 'elisp-outline-search))) #'ignore) (font-lock-keywords-only regexp) @@ -192,11 +194,7 @@ string." (if outline-minor-faces-mode (font-lock-add-keywords nil outline-minor-faces--font-lock-keywords t) (font-lock-remove-keywords nil outline-minor-faces--font-lock-keywords)) - (when font-lock-mode - (save-restriction - (widen) - (font-lock-flush) - (font-lock-ensure)))) + (font-lock-flush)) (defun outline-minor-faces--get-face () (save-excursion @@ -213,7 +211,7 @@ string." (save-excursion (and (if-let ((fn (bound-and-true-p outline-search-function)) ;; See `outline-minor-faces--syntactic-matcher'. - ((not (eq fn 'elisp-outline-search)))) + (_(not (eq fn 'elisp-outline-search)))) (funcall fn nil nil nil t) (beginning-of-line) (looking-at outline-regexp)) -- 2.47.3