]> git.eshelyaron.com Git - emacs.git/commit
* lisp/mail/rmailmm.el: Use `cl-defstruct` and `lexical-binding`
authorStefan Monnier <monnier@iro.umontreal.ca>
Tue, 9 Mar 2021 21:17:31 +0000 (16:17 -0500)
committerStefan Monnier <monnier@iro.umontreal.ca>
Tue, 9 Mar 2021 21:17:51 +0000 (16:17 -0500)
commite8f0a7b6c152116b1e87487f405dea67385e35fb
treeeb3d72cfe42764ed0d44ba2c8083efa78b2a0546
parentf97e07ea807cc6d38774a3888a15091b20645ac6
* lisp/mail/rmailmm.el: Use `cl-defstruct` and `lexical-binding`

Remove redundant `:group` args.
(rmail-mime-entity): Make it a `cl-defstruct`.
(rmail-mime-entity-set-truncated): Mark as obsolete.
(rmail-mime-display): New `cl-defstruct`.
(rmail-mime-shown-mode, rmail-mime-hidden-mode, rmail-mime-raw-mode)
(rmail-mime-toggle-hidden, rmail-mime-update-tagline)
(rmail-mime-text-handler, rmail-mime-bulk-handler)
(rmail-mime-process-multipart, rmail-mime-handle, rmail-mime-process)
(rmail-mime-parse, rmail-mime-insert, rmail-show-mime): Adjust accordingly.
(rmail-mime-toggle-raw): Apply de Morgan.
(rmail-mime-insert-text): Remove unused var `tagline`.
(rmail-mime-insert-image): Remove unused var `content-type`.
(shr-inhibit-images, shr-width): Declare vars.
(rmail-mime-insert-multipart): Remove unused vars `tagline` and `body`.
(rmail-mime-insert): Remove unused var `tagline`.
(rmail-search-mime-message): Remove unused var `body-end`.
lisp/mail/rmailmm.el