Mercurial > emacs
comparison lisp/gnus/mm-uu.el @ 91239:2fcaae6177a5
Merge from emacs--devo--0
Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-300
author | Miles Bader <miles@gnu.org> |
---|---|
date | Sun, 16 Dec 2007 05:08:49 +0000 |
parents | 53108e6cea98 30bc3f465294 |
children | 606f2d163a64 |
comparison
equal
deleted
inserted
replaced
91238:5cf14a2107b5 | 91239:2fcaae6177a5 |
---|---|
424 "application/octet-stream")) | 424 "application/octet-stream")) |
425 'x-binhex nil | 425 'x-binhex nil |
426 (if (and file-name (not (equal file-name ""))) | 426 (if (and file-name (not (equal file-name ""))) |
427 (list mm-dissect-disposition | 427 (list mm-dissect-disposition |
428 (cons 'filename file-name))))) | 428 (cons 'filename file-name))))) |
429 | |
430 (defvar gnus-original-article-buffer) ; gnus.el | |
429 | 431 |
430 (defun mm-uu-yenc-extract () | 432 (defun mm-uu-yenc-extract () |
431 ;; This might not be exactly correct, but we sure can't get the | 433 ;; This might not be exactly correct, but we sure can't get the |
432 ;; binary data from the article buffer, since that's already in a | 434 ;; binary data from the article buffer, since that's already in a |
433 ;; non-binary charset. So get it from the original article buffer. | 435 ;; non-binary charset. So get it from the original article buffer. |