mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-03-04 04:52:10 -08:00
Code Issues Projects Releases Wiki Activity

gnus-art.el (gnus-mime-delete-part): Fix Lisp type of byte(s).

Browse source
This commit is contained in:
Katsumi Yamaoka 2010-09-27 03:16:55 +00:00
parent 82bccbfa12
commit e5fa38990b
2 changed files with 7 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/gnus/ChangeLog
View file

@ -1,3 +1,7 @@
2010-09-27 Katsumi Yamaoka <yamaoka@jpl.org>
* gnus-art.el (gnus-mime-delete-part): Fix Lisp type of byte(s).
2010-09-26 Lars Magne Ingebrigtsen <larsi@gnus.org>
* nndoc.el (nndoc-request-list): Return success always.

6
lisp/gnus/gnus-art.el
View file

@ -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