/[emacs]/emacs/lisp/gnus/mm-decode.el
ViewVC logotype

Diff of /emacs/lisp/gnus/mm-decode.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.12 by zsh, Thu Mar 21 19:11:23 2002 UTC revision 1.12.2.1 by miles, Fri Apr 4 06:20:21 2003 UTC
# Line 164  Line 164 
164    "List of media types that are to be displayed inline."    "List of media types that are to be displayed inline."
165    :type '(repeat string)    :type '(repeat string)
166    :group 'mime-display)    :group 'mime-display)
167      
168  (defcustom mm-automatic-display  (defcustom mm-automatic-display
169    '("text/plain" "text/enriched" "text/richtext" "text/html"    '("text/plain" "text/enriched" "text/richtext" "text/html"
170      "text/x-vcard" "image/.*" "message/delivery-status" "multipart/.*"      "text/x-vcard" "image/.*" "message/delivery-status" "multipart/.*"
# Line 466  external if displayed external." Line 466  external if displayed external."
466                     (mm-handle-set-undisplayer handle (cons file buffer)))                     (mm-handle-set-undisplayer handle (cons file buffer)))
467                   (message "Displaying %s..." (format method file))                   (message "Displaying %s..." (format method file))
468                   'external)))))))                   'external)))))))
469      
470  (defun mm-mailcap-command (method file type-list)  (defun mm-mailcap-command (method file type-list)
471    (let ((ctl (cdr type-list))    (let ((ctl (cdr type-list))
472          (beg 0)          (beg 0)
# Line 493  external if displayed external." Line 493  external if displayed external."
493            (push "<" out)            (push "<" out)
494            (push (mm-quote-arg file) out)))            (push (mm-quote-arg file) out)))
495      (mapconcat 'identity (nreverse out) "")))      (mapconcat 'identity (nreverse out) "")))
496        
497  (defun mm-remove-parts (handles)  (defun mm-remove-parts (handles)
498    "Remove the displayed MIME parts represented by HANDLES."    "Remove the displayed MIME parts represented by HANDLES."
499    (if (and (listp handles)    (if (and (listp handles)

Legend:
Removed from v.1.12  
changed lines
  Added in v.1.12.2.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26