* Re: [rost@math.ohio-state.edu: Re: GNU Emacs 21.3.50: Patch for cus-dep.el (:version handling)]
[not found] <E18BvlB-0002hc-00@fencepost.gnu.org>
@ 2002-11-13 12:13 ` Per Abrahamsen
2002-11-13 13:40 ` Stefan Monnier
0 siblings, 1 reply; 2+ messages in thread
From: Per Abrahamsen @ 2002-11-13 12:13 UTC (permalink / raw)
Richard Stallman <rms@gnu.org> writes:
> What do you think of these two changes? Please tell emacs-devel too.
I can't see anything obviously wrong with the first. The second seems
to be Stefans territory, so I'd rather not use time analysing that,
but Markus desciption sounds convincing.
> From: Markus Rost <rost@math.ohio-state.edu>
> Subject: Re: GNU Emacs 21.3.50: Patch for cus-dep.el (:version handling)
> To: rms@gnu.org
> Cc: monnier+gnu/emacs@rum.cs.yale.edu, emacs-pretest-bug@gnu.org
> Date: Mon, 11 Nov 2002 16:06:56 -0500 (EST)
>
> The patch seems reasonable--please install it.
>
> Done.
>
> In general I think that custom related settings should not
> be put in loaddefs.el, but rather in cus-load.el.
>
> loaddefs.el contains defcustom forms, no defface forms, and just three
> defgroup forms.
>
> Aside from those three defgroup forms (whose autoload cookies should
> probably be removed--would you like to do that?), what are the
> custom-related settings you think should be removed from loaddefs.el?
>
> Let me postpone an answer (which may be empty) and rather fix some
> other things before that.
>
> Here are 2 independent changes.
>
> First, `custom-declare-group' contains an obviously unnecessary line
> of code. It does not hurt much, but should be removed for clarity.
> See the patch below.
>
> For the second patch, let me recall that Stefan had introduced for
> defcustoms and deffaces without an explicit group declaration an
> automatic group declaration which is based on `load-file-name' and
> which uses the result of the function `custom-current-group' as the
> group.
>
> This is currently not respected by `custom-make-dependencies'. As a
> result there are quite a few random entries in cus-load.el. The patch
> below for cus-dep.el fixes this.
>
> By the way, here is the current list of custom options without
> explicit or implicit group declaration:
>
> ada-tight-gvd-integration
> button (defface in button.el)
> cvs-mode-commit-hook
> describe-text-mode-hook
> mouse-wheel-down-button, mouse-wheel-up-button (a patch for them follows)
> gnus-alter-header-function, nnimap-authinfo-file, nnimap-prune-cache,
> nntp-authinfo-file (all in gnus)
>
> It is easy to find them: Load admin/cus-test.el and then load many
> libraries with M-x cus-test-load-libs. Then do
>
> M-x customize-group nil (return)
>
>
> 2002-11-11 Markus Rost <rost@math.ohio-state.edu>
>
> * custom.el (custom-declare-group): Remove unnecessary line of
> code.
>
> * cus-dep.el (custom-make-dependencies): Bind load-file-name.
>
>
> ===Buffer *vc-diff*=========================================
> *** custom.el.~1.57.~ Sat Nov 9 23:19:28 2002
> - --- custom.el Mon Nov 11 15:46:10 2002
> ***************
> *** 315,321 ****
> (while members
> (apply 'custom-add-to-group symbol (car members))
> (setq members (cdr members)))
> - - (put symbol 'custom-group (nconc members (get symbol 'custom-group)))
> (when doc
> ;; This text doesn't get into DOC.
> (put symbol 'group-documentation (purecopy doc)))
> - --- 315,320 ----
> ============================================================
>
> ===Buffer *vc-diff*=========================================
> *** cus-dep.el.~1.25.~ Mon Nov 11 11:39:07 2002
> - --- cus-dep.el Mon Nov 11 12:11:14 2002
> ***************
> *** 54,60 ****
> (insert-file-contents file)
> (goto-char (point-min))
> (string-match "\\`\\(.*\\)\\.el\\'" file)
> ! (let ((name (file-name-nondirectory (match-string 1 file))))
> (if (save-excursion
> (re-search-forward
> (concat "(provide[ \t\n]+\\('\\|(quote[ \t\n]\\)[ \t\n]*"
> - --- 54,61 ----
> (insert-file-contents file)
> (goto-char (point-min))
> (string-match "\\`\\(.*\\)\\.el\\'" file)
> ! (let ((name (file-name-nondirectory (match-string 1 file)))
> ! (load-file-name file))
> (if (save-excursion
> (re-search-forward
> (concat "(provide[ \t\n]+\\('\\|(quote[ \t\n]\\)[ \t\n]*"
> ============================================================
> ----------
^ permalink raw reply [flat|nested] 2+ messages in thread
* Re: [rost@math.ohio-state.edu: Re: GNU Emacs 21.3.50: Patch for cus-dep.el (:version handling)]
2002-11-13 12:13 ` [rost@math.ohio-state.edu: Re: GNU Emacs 21.3.50: Patch for cus-dep.el (:version handling)] Per Abrahamsen
@ 2002-11-13 13:40 ` Stefan Monnier
0 siblings, 0 replies; 2+ messages in thread
From: Stefan Monnier @ 2002-11-13 13:40 UTC (permalink / raw)
Cc: emacs-devel
> I can't see anything obviously wrong with the first. The second seems
> to be Stefans territory, so I'd rather not use time analysing that,
> but Markus desciption sounds convincing.
Looks fine to me,
Stefan
^ permalink raw reply [flat|nested] 2+ messages in thread
end of thread, other threads:[~2002-11-13 13:40 UTC | newest]
Thread overview: 2+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
[not found] <E18BvlB-0002hc-00@fencepost.gnu.org>
2002-11-13 12:13 ` [rost@math.ohio-state.edu: Re: GNU Emacs 21.3.50: Patch for cus-dep.el (:version handling)] Per Abrahamsen
2002-11-13 13:40 ` Stefan Monnier
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs.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).