Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
9ac2e4e5
Commit
9ac2e4e5
authored
Jan 16, 2006
by
Mark D. Baushke
Browse files
* mh-mime.el (mh-mime-display, mh-mm-inline-message): Fix use of mm-
functions for text=flowed. (SF #1273521)
parent
0814ca04
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
15 additions
and
3 deletions
+15
-3
lisp/mh-e/ChangeLog
lisp/mh-e/ChangeLog
+6
-0
lisp/mh-e/mh-mime.el
lisp/mh-e/mh-mime.el
+9
-3
No files found.
lisp/mh-e/ChangeLog
View file @
9ac2e4e5
2006-01-16 Mark D. Baushke <mdb@gnu.org>
* mh-mime.el (mh-mime-display, mh-mm-inline-message): Fix use of
mm- functions for proper text=flowed handling. (SF #1273521)
(Patch contributed by Katsumi Yamaoka <yamaoka@jpl.org>.)
2006-01-15 Bill Wohler <wohler@newt.com>
* mh-e.el (mh-limit-map, mh-help-messages): Change keybinding of
...
...
lisp/mh-e/mh-mime.el
View file @
9ac2e4e5
...
...
@@ -921,7 +921,10 @@ parsed and then displayed."
;; If needed dissect the current buffer
(
if
pre-dissected-handles
(
setq
handles
pre-dissected-handles
)
(
setq
handles
(
or
(
mm-dissect-buffer
nil
)
(
mm-uu-dissect
)))
(
if
(
setq
handles
(
mm-dissect-buffer
nil
))
(
when
(
fboundp
'mm-uu-dissect-text-parts
)
(
mm-uu-dissect-text-parts
handles
))
(
setq
handles
(
mm-uu-dissect
)))
(
setf
(
mh-mime-handles
(
mh-buffer-data
))
(
mm-merge-handles
handles
(
mh-mime-handles
(
mh-buffer-data
))))
...
...
@@ -1477,8 +1480,11 @@ decoding the same message multiple times."
(
mh-mime-display
(
or
(
gethash
handle
(
mh-mime-handles-cache
(
mh-buffer-data
)))
(
setf
(
gethash
handle
(
mh-mime-handles-cache
(
mh-buffer-data
)))
(
let
((
handles
(
or
(
mm-dissect-buffer
nil
)
(
mm-uu-dissect
))))
(
let
((
handles
(
mm-dissect-buffer
nil
)))
(
if
handles
(
when
(
fboundp
'mm-uu-dissect-text-parts
)
(
mm-uu-dissect-text-parts
handles
))
(
setq
handles
(
mm-uu-dissect
)))
(
setf
(
mh-mime-handles
(
mh-buffer-data
))
(
mm-merge-handles
handles
(
mh-mime-handles
(
mh-buffer-data
))))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment