emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/gnus/mm-decode.el


From: Juanma Barranquero
Subject: [Emacs-diffs] Changes to emacs/lisp/gnus/mm-decode.el
Date: Tue, 04 Feb 2003 08:06:40 -0500

Index: emacs/lisp/gnus/mm-decode.el
diff -c emacs/lisp/gnus/mm-decode.el:1.12 emacs/lisp/gnus/mm-decode.el:1.13
*** emacs/lisp/gnus/mm-decode.el:1.12   Thu Mar 21 14:11:23 2002
--- emacs/lisp/gnus/mm-decode.el        Tue Feb  4 08:06:38 2003
***************
*** 164,170 ****
    "List of media types that are to be displayed inline."
    :type '(repeat string)
    :group 'mime-display)
!   
  (defcustom mm-automatic-display
    '("text/plain" "text/enriched" "text/richtext" "text/html"
      "text/x-vcard" "image/.*" "message/delivery-status" "multipart/.*"
--- 164,170 ----
    "List of media types that are to be displayed inline."
    :type '(repeat string)
    :group 'mime-display)
! 
  (defcustom mm-automatic-display
    '("text/plain" "text/enriched" "text/richtext" "text/html"
      "text/x-vcard" "image/.*" "message/delivery-status" "multipart/.*"
***************
*** 466,472 ****
                   (mm-handle-set-undisplayer handle (cons file buffer)))
                 (message "Displaying %s..." (format method file))
                 'external)))))))
!   
  (defun mm-mailcap-command (method file type-list)
    (let ((ctl (cdr type-list))
        (beg 0)
--- 466,472 ----
                   (mm-handle-set-undisplayer handle (cons file buffer)))
                 (message "Displaying %s..." (format method file))
                 'external)))))))
! 
  (defun mm-mailcap-command (method file type-list)
    (let ((ctl (cdr type-list))
        (beg 0)
***************
*** 493,499 ****
          (push "<" out)
          (push (mm-quote-arg file) out)))
      (mapconcat 'identity (nreverse out) "")))
!     
  (defun mm-remove-parts (handles)
    "Remove the displayed MIME parts represented by HANDLES."
    (if (and (listp handles)
--- 493,499 ----
          (push "<" out)
          (push (mm-quote-arg file) out)))
      (mapconcat 'identity (nreverse out) "")))
! 
  (defun mm-remove-parts (handles)
    "Remove the displayed MIME parts represented by HANDLES."
    (if (and (listp handles)




reply via email to

[Prev in Thread] Current Thread [Next in Thread]