procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(uudecode-decode-region-internal): Make it work in a

Browse source 
multibyte buffer.
This commit is contained in:
Kenichi Handa 2007-01-12 00:55:34 +00:00
parent 51524f43ab
commit 0d7c8ac455
2 changed files with 9 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/gnus/ChangeLog
View file

@ -1,3 +1,8 @@
2007-01-12 Kenichi Handa <handa@m17n.org>
* uudecode.el (uudecode-decode-region-internal): Make it work in a
multibyte buffer.
2007-01-07 Reiner Steib <Reiner.Steib@gmx.de>
* gnus-soup.el: Add missing :group in previous change.

5
lisp/gnus/uudecode.el
View file

@ -205,7 +205,10 @@ If FILE-NAME is non-nil, save the result to FILE-NAME."
(insert (apply 'concat (nreverse result)))))
(or (markerp end) (setq end (set-marker (make-marker) end)))
(goto-char start)
(insert (apply 'concat (nreverse result)))
(if enable-multibyte-characters
(mapc #'(lambda (x) (insert (string-to-multibyte x)))
(nreverse result))
(insert (apply 'concat (nreverse result))))
(delete-region (point) end))))))
;;;###autoload