From: Jonas Bernoulli Date: Tue, 1 Jul 2025 16:11:20 +0000 (+0200) Subject: ; * lisp/transient.el: Fix section outline levels. X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1e119427e2038b9423bee37c0a6f3385ddc1d436;p=emacs.git ; * lisp/transient.el: Fix section outline levels. In [1: 77a4c63fda5] "all" code sections were needlessly nested below the ";;; Code:" section, which I do not like but can live with. However, a few sections were missed; nest them here too. Also put the "frontmatter" code, which in my libraries usually is the only code located in the ";;; Code:" section, into a new ";;;; Frontmatter" sub-section. That way it is possible again to cycle to the "show all headings but no code" state. 1: 2025-06-04 77a4c63fda5ca5d4c6d82092eaa06f1eb9b51302 (outline--hidden-headings-paths): Fix slow saves (bug#78665) (cherry picked from commit d4615d026bdfc0d40982070149fe9c55f0a661ee) --- diff --git a/lisp/transient.el b/lisp/transient.el index 794cd2fe10a..7df961eca64 100644 --- a/lisp/transient.el +++ b/lisp/transient.el @@ -31,6 +31,7 @@ ;; used to implement similar menus in other packages. ;;; Code: +;;;; Frontmatter (defconst transient-version "v0.9.1-7-gd7d2c1c2-builtin") @@ -4945,7 +4946,7 @@ This is used when a tooltip is needed.") (let ((message-log-max nil)) (message "%s" doc)))))) -;;; Menu Navigation +;;;; Menu Navigation (defun transient-scroll-up (&optional arg) "Scroll text of transient's menu window upward ARG lines. @@ -5012,7 +5013,7 @@ See `forward-button' for information about N." beg (next-single-property-change beg 'face nil (line-end-position)))))) -;;; Compatibility +;;;; Compatibility ;;;; Menu Isearch (defvar-keymap transient--isearch-mode-map @@ -5243,7 +5244,7 @@ as stand-in for elements of exhausted lists." (propertize (prin1-to-string value t) 'face (if value 'transient-value 'transient-inactive-value)))) -;;; _ +;;;; _ (provide 'transient) ;; Local Variables: ;; indent-tabs-mode: nil