projects
/
elisp
/
semi.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
1acf302
)
* mime-view.el (mime-view-read-content-transfer-encoding): Canonicalize
author
ueno
<ueno>
Mon, 24 Sep 2001 15:02:38 +0000
(15:02 +0000)
committer
ueno
<ueno>
Mon, 24 Sep 2001 15:02:38 +0000
(15:02 +0000)
"charset" parameter.
mime-view.el
patch
|
blob
|
history
diff --git
a/mime-view.el
b/mime-view.el
index
49866b1
..
46ffab0
100644
(file)
--- a/
mime-view.el
+++ b/
mime-view.el
@@
-1739,9
+1739,12
@@
If LINES is negative, scroll up LINES lines."
;; might be specified by `universal-coding-system-argument'.
(and coding-system-for-read
(coding-system-to-mime-charset coding-system-for-read)))
;; might be specified by `universal-coding-system-argument'.
(and coding-system-for-read
(coding-system-to-mime-charset coding-system-for-read)))
- (intern (mime-content-type-parameter
- (mime-entity-content-type entity)
- "charset"))
+ (let ((charset-param
+ (mime-content-type-parameter
+ (mime-entity-content-type entity)
+ "charset")))
+ (if charset-param
+ (intern (downcase charset-param))))
default-mime-charset))
(defun mime-view-read-mime-charset (entity situation)
default-mime-charset))
(defun mime-view-read-mime-charset (entity situation)