From: Kyrylo Simonov <xi@resolvent.net>
To: emacs-orgmode@gnu.org
Subject: Re: [BUG] Missing definitions for some customization groups [9.5.5 (release_9.5.5 @ /snap/emacs/current/usr/share/emacs/28.2/lisp/org/)]
Date: Wed, 16 Nov 2022 00:01:44 +0000 [thread overview]
Message-ID: <3866b3f1-b46a-caff-d66b-887e92a852b0@resolvent.net> (raw)
In-Reply-To: <87v8nife8s.fsf@localhost>
[-- Attachment #1: Type: text/plain, Size: 950 bytes --]
On 11/14/22 02:42, Ihor Radchenko wrote:
> Kyrylo Simonov <xi@resolvent.net> writes:
>
>> Some of the customization groups in org-mode lack defgroup declaration.
>> Specifically, they are:
>> (org-gnus org-startup org-export-pdf org-bbdb org-babel-tangle
>> org-bibtex org-plot)
>>
>> In the *Customize* interface, these subgroups are not accessible from
>> the main Org customization page and vice versa. To reproduce, type
>> "M-x customize-group org" and witness that, for example, Org Startup
>> subgroup is not listed. Then type "M-x customize-group org-startup" and
>> see that the group definition and the link to the parent group are
>> missing.
> Confirmed.
> Would you be interested to create a patch? It is mostly a question of
> adding a bunch of `defgroup' statements.
I attached a patch. Where it made sense, I added a new defgroup
declaration. For other cases, I moved the variables under some
existing group.
Thanks, Kyrylo
[-- Attachment #2: 0001-Fix-missing-customization-groups.patch --]
[-- Type: text/x-patch, Size: 7715 bytes --]
From 7be0b6eb51748ccf044fffb87020c27fe9dca81e Mon Sep 17 00:00:00 2001
From: Kyrylo Simonov <xi@resolvent.net>
Date: Tue, 15 Nov 2022 22:49:56 +0000
Subject: [PATCH] Fix missing customization groups
* lisp/ob-tangle.el (org-babel-tangle): Add missing group definition.
(org-babel-post-tangle-hook):
(org-babel-pre-tangle-hook):
(org-babel-tangle-body-hook):
(org-babel-tangle-finished-hook):
(org-babel-tangle-comment-format-beg):
(org-babel-tangle-comment-format-end):
(org-babel-tangle-uncomment-comments):
(org-babel-process-comment-text):
(org-babel-tangle-default-file-mode): Move under `org-babel-tangle'
group.
* lisp/ol-bbdb.el (org-bbdb-anniversaries): Move under `org-agenda'
instead of a non-existent `org-bbdb'.
* lisp/ol-bibtex.el (org-bibtex): Add missing group definition.
* lisp/ol-gnus.el (org-gnus-no-server): Move under group
`org-link-follow' instead of a non-existent `org-gnus'.
* lisp/org-plot.el (org-plot): Add missing group definition.
* lisp/org.el (org-startup): Add missing group definition.
* lisp/ox-latex.el (org-latex-pdf-process): Move under
`org-export-latex' instead of a non-existent `org-export-pdf'.
* lisp/ox-man.el (org-man-pdf-process): Remove reference to
non-existent group `org-export-pdf'.
TINYCHANGE
---
lisp/ob-tangle.el | 23 ++++++++++++++---------
lisp/ol-bbdb.el | 2 +-
lisp/ol-bibtex.el | 5 +++++
lisp/ol-gnus.el | 2 +-
lisp/org-plot.el | 5 +++++
lisp/org.el | 5 +++++
lisp/ox-latex.el | 2 +-
lisp/ox-man.el | 1 -
8 files changed, 32 insertions(+), 13 deletions(-)
diff --git a/lisp/ob-tangle.el b/lisp/ob-tangle.el
index 5074880c4..e86f4e528 100644
--- a/lisp/ob-tangle.el
+++ b/lisp/ob-tangle.el
@@ -51,6 +51,11 @@
(declare-function outline-previous-heading "outline" ())
(defvar org-id-link-to-org-use-id) ; Dynamically scoped
+(defgroup org-babel-tangle nil
+ "Options for extracting source code from code blocks."
+ :tag "Org Babel Tangle"
+ :group 'org-babel)
+
(defcustom org-babel-tangle-lang-exts
'(("emacs-lisp" . "el")
("elisp" . "el"))
@@ -73,26 +78,26 @@ then the name of the language is used."
(defcustom org-babel-post-tangle-hook nil
"Hook run in code files tangled by `org-babel-tangle'."
- :group 'org-babel
+ :group 'org-babel-tangle
:version "24.1"
:type 'hook)
(defcustom org-babel-pre-tangle-hook '(save-buffer)
"Hook run at the beginning of `org-babel-tangle' in the original buffer."
- :group 'org-babel
+ :group 'org-babel-tangle
:version "24.1"
:type 'hook)
(defcustom org-babel-tangle-body-hook nil
"Hook run over the contents of each code block body."
- :group 'org-babel
+ :group 'org-babel-tangle
:version "24.1"
:type 'hook)
(defcustom org-babel-tangle-finished-hook nil
"Hook run at the very end of `org-babel-tangle' in the original buffer.
In this way, it is the counterpart to `org-babel-pre-tangle-hook'."
- :group 'org-babel
+ :group 'org-babel-tangle
:package-version '(Org . "9.6")
:type 'hook)
@@ -112,7 +117,7 @@ non-nil value.
Whether or not comments are inserted during tangling is
controlled by the :comments header argument."
- :group 'org-babel
+ :group 'org-babel-tangle
:version "24.1"
:type 'string)
@@ -132,7 +137,7 @@ non-nil value.
Whether or not comments are inserted during tangling is
controlled by the :comments header argument."
- :group 'org-babel
+ :group 'org-babel-tangle
:version "24.1"
:type 'string)
@@ -141,7 +146,7 @@ controlled by the :comments header argument."
of tangle comments. Use `org-babel-tangle-comment-format-beg'
and `org-babel-tangle-comment-format-end' to customize the format
of tangled comments."
- :group 'org-babel
+ :group 'org-babel-tangle
:type 'boolean)
(defcustom org-babel-process-comment-text 'org-remove-indentation
@@ -149,7 +154,7 @@ of tangled comments."
inserted as comments in tangled source-code files. The function
should take a single string argument and return a string
result. The default value is `org-remove-indentation'."
- :group 'org-babel
+ :group 'org-babel-tangle
:version "24.1"
:type 'function)
@@ -157,7 +162,7 @@ result. The default value is `org-remove-indentation'."
"The default mode used for tangled files, as an integer.
The default value 356 correspands to the octal #o544, which is
read-write permissions for the user, read-only for everyone else."
- :group 'org-babel
+ :group 'org-babel-tangle
:package-version '(Org . "9.6")
:type 'integer)
diff --git a/lisp/ol-bbdb.el b/lisp/ol-bbdb.el
index 7c01c5919..ec1d755e8 100644
--- a/lisp/ol-bbdb.el
+++ b/lisp/ol-bbdb.el
@@ -135,7 +135,7 @@
(defgroup org-bbdb-anniversaries nil
"Customizations for including anniversaries from BBDB into Agenda."
- :group 'org-bbdb)
+ :group 'org-agenda)
(defcustom org-bbdb-default-anniversary-format "birthday"
"Default anniversary class."
diff --git a/lisp/ol-bibtex.el b/lisp/ol-bibtex.el
index d8547f316..313b1cde8 100644
--- a/lisp/ol-bibtex.el
+++ b/lisp/ol-bibtex.el
@@ -236,6 +236,11 @@
(defvar org-bibtex-entries nil
"List to hold parsed bibtex entries.")
+(defgroup org-bibtex nil
+ "Options for translating between Org headlines and BibTeX entries."
+ :tag "Org BibTeX"
+ :group 'org)
+
(defcustom org-bibtex-autogen-keys nil
"Set to a truth value to use `bibtex-generate-autokey' to generate keys."
:group 'org-bibtex
diff --git a/lisp/ol-gnus.el b/lisp/ol-gnus.el
index a7bb65555..185218ab7 100644
--- a/lisp/ol-gnus.el
+++ b/lisp/ol-gnus.el
@@ -74,7 +74,7 @@ negates this setting for the duration of the command."
(defcustom org-gnus-no-server nil
"Should Gnus be started using `gnus-no-server'?"
- :group 'org-gnus
+ :group 'org-link-follow
:version "24.4"
:package-version '(Org . "8.0")
:type 'boolean)
diff --git a/lisp/org-plot.el b/lisp/org-plot.el
index 9665a9e68..ef6b5aa05 100644
--- a/lisp/org-plot.el
+++ b/lisp/org-plot.el
@@ -294,6 +294,11 @@ When NORMALIZE is non-nil, the count is divided by the number of values."
))
(cl-subseq factors 0 -1)))
+(defgroup org-plot nil
+ "Options for plotting in Org mode."
+ :tag "Org Plot"
+ :group 'org)
+
(defcustom org-plot/gnuplot-script-preamble ""
"String of function to be inserted before the gnuplot plot command is run.
diff --git a/lisp/org.el b/lisp/org.el
index 7aaef06f0..857c3147c 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -977,6 +977,11 @@ equivalent option for agenda views."
:group 'org-todo
:group 'org-archive)
+(defgroup org-startup nil
+ "Startup options Org uses when first visiting a file."
+ :tag "Org Startup"
+ :group 'org)
+
(defcustom org-startup-folded 'showeverything
"Non-nil means entering Org mode will switch to OVERVIEW.
diff --git a/lisp/ox-latex.el b/lisp/ox-latex.el
index 9bdb9fb63..b5f81fe53 100644
--- a/lisp/ox-latex.el
+++ b/lisp/ox-latex.el
@@ -1440,7 +1440,7 @@ Alternatively, this may be a Lisp function that does the
processing, so you could use this to apply the machinery of
AUCTeX or the Emacs LaTeX mode. This function should accept the
file name as its single argument."
- :group 'org-export-pdf
+ :group 'org-export-latex
:type '(choice
(repeat :tag "Shell command sequence"
(string :tag "Shell command"))
diff --git a/lisp/ox-man.el b/lisp/ox-man.el
index 339ab11cd..111c46aed 100644
--- a/lisp/ox-man.el
+++ b/lisp/ox-man.el
@@ -226,7 +226,6 @@ By default, Org uses 3 runs of to do the processing.
Alternatively, this may be a Lisp function that does the
processing. This function should accept the file name as
its single argument."
- :group 'org-export-pdf
:group 'org-export-man
:version "24.4"
:package-version '(Org . "8.0")
--
2.34.1
next prev parent reply other threads:[~2022-11-16 0:03 UTC|newest]
Thread overview: 4+ messages / expand[flat|nested] mbox.gz Atom feed top
2022-11-13 16:17 [BUG] Missing definitions for some customization groups [9.5.5 (release_9.5.5 @ /snap/emacs/current/usr/share/emacs/28.2/lisp/org/)] Kyrylo Simonov
2022-11-14 2:42 ` Ihor Radchenko
2022-11-16 0:01 ` Kyrylo Simonov [this message]
2022-11-16 2:12 ` Ihor Radchenko
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.orgmode.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=3866b3f1-b46a-caff-d66b-887e92a852b0@resolvent.net \
--to=xi@resolvent.net \
--cc=emacs-orgmode@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).