1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 06:20:55 -08:00
emacs/lisp/gnus
Stefan Monnier 9be4f41b42 * lisp/gnus: Misc simplifications found during conversion to lexical
* lisp/gnus/nnoo.el (noo-import-1, nnoo-define-skeleton-1): Use `dolist`.
(noo-map-functions, nnoo-define-basics): Directly emit the code rather than
going through an intermediate function; this also avoids the use of `eval`.
(noo-map-functions-1, nnoo-define-basics-1): Delete functions,
folded into their corresponding macro.

* lisp/gnus/gmm-utils.el (gmm-tool-bar-from-list): Demote `eval` to
`symbol-value`.

* lisp/gnus/gnus-art.el (gnus-button-handle-describe-key): Avoid `eval`
since `kbd` is a function nowadays.
(gnus-treat-part-number): Rename from `part-number`.
(gnus-treat-total-parts): Rename from `total-parts`.
(gnus-treat-article, gnus-treat-predicate): Adjust accordingly.

* lisp/gnus/gnus-cache.el (gnus-agent-load-alist): Use `declare-function`.

* lisp/gnus/gnus-group.el (gnus-cache-active-hashtb): Use `defvar`.
(gnus-group-iterate): Make it a normal function since lexical scoping
avoids the risk of name capture anyway.
(gnus-group-delete-articles): Actually use the `oldp` arg.

* lisp/gnus/gnus-html.el (gnus-html-wash-images): Fix debug message so
it's emitted after the `url` var it prints is actually initialized.
And avoid `setq` while we're at it.

* lisp/gnus/gnus-msg.el (gnus-group-mail, gnus-group-news)
(gnus-summary-mail-other-window, gnus-summary-news-other-window):
Merge `let`s using `let*`.

* lisp/gnus/gnus-spec.el (gnus-update-format-specifications):
Tighten the scope of `buffer`, and tighten a regexp.
(gnus-parse-simple-format): Reduce code duplication.

* lisp/gnus/gnus-start.el (gnus-child-mode): Don't `defvar` it since we
never use that variable and accordingly don't define it as a minor mode.

* lisp/gnus/gnus-util.el (gnus-byte-compile): Simplify so it obeys
`gnus-use-byte-compile` not just on the first call.
(iswitchb-minibuffer-setup): Declare.

* lisp/gnus/mail-source.el (mail-source-bind-1)
(mail-source-bind-common-1): Use `mapcar`.
(mail-source-set-common-1): Use `dolist`.
(display-time-event-handler): Declare.

* lisp/gnus/mml-smime.el (mml-smime-epg-verify): Reduce code duplication.

* lisp/gnus/mml.el (mml-parse-1): Reduce code duplication.

* lisp/gnus/mml2015.el (mml2015-epg-verify): Reduce code duplication.

* lisp/gnus/nnmail.el (nnmail-get-split-group): Tighten regexp.
(nnmail-split-it): Reduce code duplication.

* lisp/gnus/nnweb.el (nnweb-request-article): Avoid `setq`.

* lisp/gnus/spam.el (BBDB): Use the `noerror` arg of `require`, and
define all the functions for BBDB regardless if the require succeeded.
(spam-exists-in-BBDB-p): Don't inline, not worth it.
2021-01-30 17:30:08 -05:00
..
.dir-locals.el
canlock.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
ChangeLog.1 Update copyright year to 2021 2021-01-01 01:13:56 -08:00
ChangeLog.2 Update copyright year to 2021 2021-01-01 01:13:56 -08:00
ChangeLog.3 Update copyright year to 2021 2021-01-01 01:13:56 -08:00
deuglify.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
gmm-utils.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
gnus-agent.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
gnus-art.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
gnus-async.el Revert "Allow gnus-retrieve-headers to return headers directly" 2021-01-26 08:47:07 -08:00
gnus-bcklg.el Update copyright year to 2021 2021-01-01 01:13:56 -08:00
gnus-bookmark.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
gnus-cache.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
gnus-cite.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
gnus-cloud.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
gnus-cus.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
gnus-dbus.el Update copyright year to 2021 2021-01-01 01:13:56 -08:00
gnus-delay.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
gnus-demon.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
gnus-diary.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
gnus-dired.el * lisp/gnus/mm-encode.el (mm-default-file-type): New name 2021-01-30 12:29:58 -05:00
gnus-draft.el * lisp/gnus: Use with-current-buffer at a few more places 2021-01-30 14:46:41 -05:00
gnus-dup.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
gnus-eform.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
gnus-fun.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
gnus-gravatar.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
gnus-group.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
gnus-html.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
gnus-icalendar.el Fix Gnus icalendar button navigation 2021-01-28 06:21:40 +01:00
gnus-int.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
gnus-kill.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
gnus-logic.el Update copyright year to 2021 2021-01-01 01:13:56 -08:00
gnus-mh.el Update copyright year to 2021 2021-01-01 01:13:56 -08:00
gnus-ml.el Update copyright year to 2021 2021-01-01 01:13:56 -08:00
gnus-mlspl.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
gnus-msg.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
gnus-notifications.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
gnus-picon.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
gnus-range.el Update copyright year to 2021 2021-01-01 01:13:56 -08:00
gnus-registry.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
gnus-rfc1843.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
gnus-salt.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
gnus-score.el * lisp/gnus: Use with-current-buffer at a few more places 2021-01-30 14:46:41 -05:00
gnus-search.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
gnus-sieve.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
gnus-spec.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
gnus-srvr.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
gnus-start.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
gnus-sum.el * lisp/gnus: Demote some macros and defsubsts, plus a fix 2021-01-30 14:46:46 -05:00
gnus-topic.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
gnus-undo.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
gnus-util.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
gnus-uu.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
gnus-vm.el Update copyright year to 2021 2021-01-01 01:13:56 -08:00
gnus-win.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
gnus.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
gssapi.el Update copyright year to 2021 2021-01-01 01:13:56 -08:00
legacy-gnus-agent.el Update copyright year to 2021 2021-01-01 01:13:56 -08:00
mail-source.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
message.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
mm-archive.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
mm-bodies.el Update copyright year to 2021 2021-01-01 01:13:56 -08:00
mm-decode.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
mm-encode.el * lisp/gnus/mm-encode.el (mm-default-file-type): New name 2021-01-30 12:29:58 -05:00
mm-extern.el Update copyright year to 2021 2021-01-01 01:13:56 -08:00
mm-partial.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
mm-url.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
mm-util.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
mm-uu.el Update copyright year to 2021 2021-01-01 01:13:56 -08:00
mm-view.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
mml-sec.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
mml-smime.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
mml.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
mml1991.el Update copyright year to 2021 2021-01-01 01:13:56 -08:00
mml2015.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
nnagent.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
nnbabyl.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
nndiary.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
nndir.el Update copyright year to 2021 2021-01-01 01:13:56 -08:00
nndoc.el * lisp/gnus: Use with-current-buffer at a few more places 2021-01-30 14:46:41 -05:00
nndraft.el * lisp/gnus: Use with-current-buffer at a few more places 2021-01-30 14:46:41 -05:00
nneething.el Update copyright year to 2021 2021-01-01 01:13:56 -08:00
nnfolder.el * lisp/gnus: Use with-current-buffer at a few more places 2021-01-30 14:46:41 -05:00
nngateway.el Update copyright year to 2021 2021-01-01 01:13:56 -08:00
nnheader.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
nnimap.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
nnmail.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
nnmaildir.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
nnmairix.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
nnmbox.el * lisp/gnus: Use with-current-buffer at a few more places 2021-01-30 14:46:41 -05:00
nnmh.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
nnml.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
nnnil.el
nnoo.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
nnregistry.el Update copyright year to 2021 2021-01-01 01:13:56 -08:00
nnrss.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
nnselect.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
nnspool.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
nntp.el * lisp/gnus: Demote some macros and defsubsts, plus a fix 2021-01-30 14:46:46 -05:00
nnvirtual.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
nnweb.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00
score-mode.el Update copyright year to 2021 2021-01-01 01:13:56 -08:00
smiley.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
smime.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
spam-report.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
spam-stat.el * lisp/gnus: Remove redundant :group args 2021-01-30 14:46:46 -05:00
spam-wash.el * lisp/gnus: Quote functions with #' 2021-01-30 12:27:34 -05:00
spam.el * lisp/gnus: Misc simplifications found during conversion to lexical 2021-01-30 17:30:08 -05:00