summaryrefslogtreecommitdiff
path: root/lisp/gnus/gnus-art.el
diff options
context:
space:
mode:
authorKatsumi Yamaoka <yamaoka@jpl.org>2010-09-27 03:16:55 +0000
committerKatsumi Yamaoka <yamaoka@jpl.org>2010-09-27 03:16:55 +0000
commite5fa38990bca723fc3ef1d0ede792e8ff84b84f7 (patch)
treef4439c26aa8306d294a40d0eca35e5a6b0e93753 /lisp/gnus/gnus-art.el
parent82bccbfa12a1db876a2011f35e5684d15095c141 (diff)
downloademacs-e5fa38990bca723fc3ef1d0ede792e8ff84b84f7.tar.gz
emacs-e5fa38990bca723fc3ef1d0ede792e8ff84b84f7.tar.bz2
emacs-e5fa38990bca723fc3ef1d0ede792e8ff84b84f7.zip
gnus-art.el (gnus-mime-delete-part): Fix Lisp type of byte(s).
Diffstat (limited to 'lisp/gnus/gnus-art.el')
-rw-r--r--lisp/gnus/gnus-art.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index 5662bfa5e8b..221af8c06cd 100644
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -5072,7 +5072,7 @@ Deleting parts may malfunction or destroy the article; continue? "))
(unless data
(error "No MIME part under point"))
(with-current-buffer (mm-handle-buffer data)
- (let ((bsize (format "%s" (buffer-size))))
+ (let ((bsize (buffer-size)))
(erase-buffer)
(insert
(concat
@@ -5081,8 +5081,8 @@ Deleting parts may malfunction or destroy the article; continue? "))
"|\n"
"| Type: " type "\n"
"| Filename: " filename "\n"
- "| Size (encoded): " bsize (format " byte%s\n"
- (if (= bsize 1)
+ "| Size (encoded): " (format "%s byte%s\n"
+ bsize (if (= bsize 1)
""
"s"))
(when description