🚀 go-pugleaf

Hi,

I have this in my init file:

(setq vm-mime-internal-content-type-exceptions '("text/html"))
(add-to-list 'vm-mime-type-converter-alist
             '("text/html" "text/plain" "lynx -force_html -dump -stdin"))

Unfortunately the result is that messages containing MIME
types such as

Content-type: text/html; charset=gb2312

are converted into text/plain OK, but the "charset=gb2312"
part is ignored.  (lynx just passes the characters through
as it gets them, but VM doesn't interpret the gb2312
characters.)

I think things like "text/html; charset=gb2312" should be
mapped to "text/plain; charset=gb2312" by the above rule,
not just to "text/plain".  (Obviously it would be awkward to
specify every single character set as a special case; my
mail uses rather a lot of them.)

Thanks,        Silas


Emacs  : XEmacs 21.4 (patch 6) "Common Lisp" [Lucid] (i386-debian-linux, Mule) of Sat Apr  6 2002 on eeyore
Package: VM 7.03

current state:
==============
(setq
 vm-arrived-message-hook nil
 vm-arrived-messages-hook '(vm-auto-archive-messages)
 vm-auto-center-summary 0
 vm-auto-decode-mime-messages t
 vm-auto-displayed-mime-content-type-exceptions nil
 vm-auto-displayed-mime-content-types '("text" "multipart")
 vm-auto-folder-case-fold-search t
 vm-auto-get-new-mail t
 vm-auto-next-message t
 vm-berkeley-mail-compatibility nil
 vm-check-folder-types t
 vm-circular-folders nil
 vm-confirm-new-folders nil
 vm-confirm-quit 0
 vm-convert-folder-types t
 vm-crash-box "~/INBOX.CRASH"
 vm-crash-box-suffix nil
 vm-default-From_-folder-type 'From_
 vm-default-folder-type 'From_
 vm-delete-after-archiving nil
 vm-delete-after-bursting nil
 vm-delete-after-saving t
 vm-delete-empty-folders t
 vm-digest-burst-type "guess"
 vm-digest-identifier-header-format "X-Digest: %s\n"
 vm-digest-center-preamble t
 vm-digest-preamble-format "\"%s\" (%F)"
 vm-digest-send-type "mime"
 vm-display-buffer-hook nil
 vm-display-using-mime t
 vm-edit-message-hook nil
 vm-edit-message-mode 'text-mode
 vm-fill-paragraphs-containing-long-lines 60
 vm-flush-interval nil
 vm-folder-directory "~/.vm"
 vm-folder-read-only nil
 vm-folders-summary-database "~/.vm.folders.db"
 vm-folders-summary-directories '("~/")
 vm-folders-summary-format "  %12f %4t total, %n new, %u unread, %s spooled\n"
 vm-follow-summary-cursor t
 vm-forward-message-hook nil
 vm-forwarded-headers nil
 vm-forwarding-digest-type "mime"
 vm-forwarding-subject-format "forwarded message from %F"
 vm-frame-parameter-alist nil
 vm-frame-per-completion t
 vm-frame-per-composition t
 vm-frame-per-edit t
 vm-frame-per-folder t
 vm-frame-per-folders-summary nil
 vm-frame-per-help nil
 vm-frame-per-summary nil
 vm-highlight-url-face 'bold-italic
 vm-highlighted-header-regexp nil
 vm-honor-page-delimiters nil
 vm-image-directory "/usr/share/xemacs21/packages/etc/vm/"
 vm-imagemagick-convert-program nil
 vm-imagemagick-identify-program nil
 vm-imap-bytes-per-session nil
 vm-imap-expunge-after-retrieving t
 vm-imap-max-message-size nil
 vm-imap-messages-per-session nil
 vm-imap-session-preauth-hook nil
 vm-in-reply-to-format nil
 vm-included-text-attribution-format "%F writes:\n"
 vm-included-text-discard-header-regexp nil
 vm-included-text-headers nil
 vm-included-text-prefix "> "
 vm-index-file-suffix nil
 vm-init-file "~/.vm"
 vm-infer-mime-types t
 vm-invisible-header-regexp nil
 vm-jump-to-new-messages t
 vm-jump-to-unread-messages t
 vm-keep-crash-boxes nil
 vm-keep-sent-messages nil
 vm-lynx-program "lynx"
 vm-mail-header-from nil
 vm-mail-header-insert-date t
 vm-mail-header-insert-message-id t
 vm-mail-hook nil
 vm-mail-check-interval nil
 vm-mail-mode-hook '(protect-mail-separator)
 vm-mail-send-hook '(vm-workaround-big5-bug fix-bug-address
                     unprotect-mail-separator)
 vm-make-crash-box-name nil
 vm-make-spool-file-name nil
 vm-mime-7bit-composition-charset "us-ascii"
 vm-mime-8bit-composition-charset "iso-8859-1"
 vm-mime-8bit-text-transfer-encoding 'quoted-printable
 vm-mime-alternative-select-method 'best-internal
 vm-mime-attachment-auto-type-alist '(("\\.jpe?g$" .
                                       "image/jpeg")
                                      ("\\.gif$" .
                                       "image/gif")
                                      ("\\.png$" .
                                       "image/png")
                                      ("\\.tiff?$" .
                                       "image/tiff")
                                      ("\\.html?$" .
                                       "text/html")
                                      ("\\.au$" .
                                       "audio/basic")
                                      ("\\.mpe?g$" .
                                       "video/mpeg")
                                      ("\\.mov$" .
                                       "video/quicktime")
                                      ("\\.e?ps$" .
                                       "application/postscript")
                                      ("\\.pdf$" .
                                       "application/pdf")
                                      ("\\.xls$" .
                                       "application/vnd.ms-excel")
                                      ("\\.doc$" .
                                       "application/msword")
                                      ("\\.ppt$" .
                                       "application/vnd.ms-powerpoint")
                                      )
 vm-mime-attachment-save-directory nil
 vm-mime-avoid-folding-content-type t
 vm-mime-base64-decoder-program "mmencode"
 vm-mime-base64-decoder-switches '("-b" "-u")
 vm-mime-base64-encoder-program "mmencode"
 vm-mime-base64-encoder-switches '("-b")
 vm-mime-button-face 'gui-button-face
 vm-mime-button-format-alist '(("text" .
                                "%-35.35(%d, %c%) [%k to %a]")
                               ("multipart/alternative" .
                                "%-35.35(%d%) [%k to %a]")
                               ("multipart/digest" .
                                "%-35.35(%d, %n message%s%) [%k to %a]")
                               ("multipart" .
                                "%-35.35(%d, %n part%s%) [%k to %a]")
                               ("message/partial" .
                                "%-35.35(%d, part %N (of %T)%) [%k to %a]")
                               ("message/external-body" .
                                "%-35.35(%d%) [%k to %a (%x)]")
                               ("message" .
                                "%-35.35(%d%) [%k to %a]")
                               ("audio" .
                                "%-35.35(%d%) [%k to %a]")
                               ("video" .
                                "%-35.35(%d%) [%k to %a]")
                               ("image" .
                                "%-35.35(%d%) [%k to %a]")
                               ("application/octet-stream"
                                .
                                "%-35.35(%d, %f%) [%k to %a]")
                               )
 vm-mime-charset-converter-alist nil
 vm-mime-charset-font-alist nil
 vm-mime-confirm-delete t
 vm-mime-decode-for-preview t
 vm-mime-default-face-charset-exceptions nil
 vm-mime-default-face-charsets '("us-ascii" "iso-8859-1"
                                 "windows-1252"
                                 "windows-1251"
                                 "windows-1257"
                                 "windows-874"
                                 "windows-1250")
 vm-mime-delete-after-saving nil
 vm-mime-delete-viewer-processes t
 vm-mime-digest-discard-header-regexp nil
 vm-mime-digest-headers '("Resent-" "From:" "Sender:" "To:"
                          "Cc:" "Subject:" "Date:"
                          "Message-ID:" "Keywords:"
                          "MIME-Version:" "Content-")
 vm-mime-display-function nil
 vm-mime-external-content-types-alist nil
 vm-mime-ignore-mime-version t
 vm-mime-internal-content-type-exceptions '("text/html")
 vm-mime-internal-content-types t
 vm-mime-max-message-size nil
 vm-mime-qp-decoder-program nil
 vm-mime-qp-decoder-switches nil
 vm-mime-qp-encoder-program nil
 vm-mime-qp-encoder-switches nil
 vm-mime-require-mime-version-header t
 vm-mime-type-converter-alist '(("text/html" "text/plain"
                                 "lynx -force_html -dump -stdin -raw")
                                ("text/html" "text/plain"
                                 "lynx -force_html -dump -stdin")
                                )
 vm-mime-use-image-strips t
 vm-mime-uuencode-decoder-program "uudecode"
 vm-mime-uuencode-decoder-switches nil
 vm-mode-hook '((lambda nil
                 (progn (local-unset-key ?\#)
                  (local-set-key ?\#
                   (quote vm-expunge-folder))
                  )
                 )
                fix-fonts erase-vm-startup)
 vm-mode-hooks nil
 vm-mosaic-program "Mosaic"
 vm-mosaic-program-switches nil
 vm-move-after-deleting t
 vm-move-after-undeleting t
 vm-move-after-killing t
 vm-move-messages-physically nil
 vm-movemail-program "movemail"
 vm-mutable-frames t
 vm-mutable-windows t
 vm-netscape-program "netscape"
 vm-netscape-program-switches nil
 vm-page-continuation-glyph "...press SPACE to see more..."
 vm-paragraph-fill-column 60
 vm-pop-bytes-per-session nil
 vm-pop-expunge-after-retrieving t
 vm-pop-max-message-size nil
 vm-pop-messages-per-session nil
 vm-pop-md5-program "md5"
 vm-popup-menu-on-mouse-3 t
 vm-preferences-file "~/.vm.preferences"
 vm-preview-lines nil
 vm-preview-read-messages nil
 vm-primary-inbox "~/INBOX"
 vm-quit-hook nil
 vm-recognize-imap-maildrops "^\\(imap\\|imap-ssl\\|imap-ssh\\):[^:]+:[^:]+:[^:]+:[^:]+:[^:]+:[^:]+"
 vm-recognize-pop-maildrops "^\\(pop:\\|pop-ssl:\\|pop-ssh:\\)?[^:]+:[^:]+:[^:]+:[^:]+:[^:]+"
 vm-reply-hook nil
 vm-reply-ignored-reply-tos nil
 vm-reply-subject-prefix "Re: "
 vm-resend-bounced-discard-header-regexp nil
 vm-resend-bounced-headers '("MIME-Version:" "Content-"
                             "From:" "Sender:" "Reply-To:"
                             "To:" "Cc:" "Subject:"
                             "Newsgroups:" "In-Reply-To:"
                             "References:" "Keywords:" "X-")
 vm-resend-bounced-message-hook nil
 vm-resend-discard-header-regexp "\\(\\(X400-\\)?Received:\\|Resent-\\)"
 vm-resend-headers nil
 vm-resend-message-hook '(unprotect-mail-separator)
 vm-retrieved-spooled-mail-hook nil
 vm-rfc1153-digest-discard-header-regexp "\\(X400-\\)?Received:"
 vm-rfc1153-digest-headers '("Resent-" "Date:" "From:"
                             "Sender:" "To:" "Cc:"
                             "Subject:" "Message-ID:"
                             "Keywords:")
 vm-rfc934-digest-discard-header-regexp nil
 vm-rfc934-digest-headers '("Resent-" "From:" "Sender:"
                            "To:" "Cc:" "Subject:" "Date:"
                            "Message-ID:" "Keywords:")
 vm-search-using-regexps nil
 vm-select-message-hook '(fix-fonts
                          bbdb/vm-pop-up-bbdb-buffer)
 vm-select-new-message-hook nil
 vm-select-unread-message-hook nil
 vm-send-digest-hook nil
 vm-send-using-mime t
 vm-skip-deleted-messages t
 vm-skip-read-messages nil
 vm-spool-file-suffixes nil
 vm-spooled-mail-waiting-hook nil
 vm-ssh-program "ssh"
 vm-ssh-program-switches nil
 vm-ssh-remote-command "echo ready; sleep 15"
 vm-startup-with-summary t
 vm-strip-reply-headers nil
 vm-stunnel-program "stunnel"
 vm-stunnel-program-switches nil
 vm-stunnel-random-data-method 'generate
 vm-subject-significant-chars nil
 vm-summary-format "%*%a %-17.17F %-25.25s %4l/%-5c %-3.3m %2d\n"
 vm-summary-highlight-face 'bold
 vm-summary-mode-hook '(fix-fonts erase-vm-startup)
 vm-summary-mode-hooks nil
 vm-summary-redo-hook nil
 vm-summary-show-threads nil
 vm-summary-thread-indent-level 2
 vm-summary-uninteresting-senders nil
 vm-summary-uninteresting-senders-arrow "To: "
 vm-tale-is-an-idiot t
 vm-temp-file-directory "/tmp"
 vm-thread-using-subject t
 vm-toolbar-pixmap-directory "/usr/share/xemacs21/packages/etc/vm/"
 vm-trust-From_-with-Content-Length nil
 vm-undisplay-buffer-hook '(vm-delete-buffer-frame)
 vm-unforwarded-header-regexp "only-drop-this-header"
 vm-url-browser 'browse-url-mozilla
 vm-url-retrieval-methods '(lynx wget w3m url-w3)
 vm-url-search-limit 12000
 vm-use-menus '(folder motion send mark label sort virtual
                undo dispose emacs nil help)
 vm-use-toolbar nil
 vm-virtual-folder-alist nil
 vm-virtual-mirror t
 vm-visible-headers '("Resent-" "From:" "Sender:" "To:"
                      "Apparently-To:" "Cc:" "Subject:"
                      "Date:")
 vm-visit-folder-hook nil
 vm-visit-when-saving 0
 vm-warp-mouse-to-new-frame nil
 vm-wget-program "wget"
 vm-window-configuration-file "~/.vm.windows"
 features '(reporter man mel dabbrev info view-less view
            hyper-apropos gnus-picon w3-forms w3-display
            w3-imap w3-widget css font w3-mouse w3-vars
            w3-cus w3-keyword url mm mule-sysdp url-parse
            url-vars sort smiley annotations gnus-cite
            flow-fill gnus-async gnus-score score-mode
            gnus-ml gnus-msg gnus-art mm-uu mm-view
            disp-table gnus-sum nndraft nnmh gnus-cache
            gnus-group gnus-undo nnmail mail-source
            format-spec nntp nnoo gnus-start gnus-range
            gnus-spec gnus-int gnus-win gnus gnus-ems
            gnus-xmas wid-edit message messagexmas mml
            mm-decode mm-encode mailcap mm-bodies uudecode
            mail-parse rfc2045 rfc2231 rfc2047 qp
            ietf-drums mailheader gnus-util time-date
            parse-time nnheader nnheaderxm mm-util
            mail-prsvr tex-mode comint ring vm-minibuf
            vm-macro skk-cursor skk-server skk-num skk
            skk-leim japan-util skk-foreword queue-m alist
            pcustom poem poem-xm pces pces-xfc pces-20
            broken pces-xm poe-xemacs timer overlay poe
            mail-utils vm-reply vm-edit vm-delete
            bbdb-hooks vm-save vm-undo bbdb-gui vm-page
            vm-mime vm-toolbar vm-summary tapestry
            vm-motion vm-message vm-menu vm-folder vm-misc
            vm-mouse vm-window time gnuserv efs-cu
            emacs-wiki executable pcomplete whitespace-mode
            filladapt time-stamp func-menu redo jka-compr
            uniquify paren blink-paren byte-optimize
            bytecomp byte-compile advice advice-preload
            bbdb-vm highlight-headers vm-vars vm-startup
            vm-version vm vm-autoload bbdb-snarf mail-extr
            bbdb-com mail-abbrevs sendmail rfc822 bbdb
            timezone pym static apel-ver product
            rsz-minibuf font-lock cus-face lout-mode
            skeleton compile un-define mule-uni
            ada-autoloads apel-autoloads auctex-autoloads
            bbdb-autoloads c-support-autoloads
            calc-autoloads calendar-autoloads
            cc-mode-autoloads clearcase-autoloads
            cookie-autoloads crisp-autoloads
            debug-autoloads dired-autoloads
            edebug-autoloads ediff-autoloads
            edit-utils-autoloads edt-autoloads
            efs-autoloads eieio-autoloads elib-autoloads
            emerge-autoloads eshell-autoloads
            eterm-autoloads eudc-autoloads
            footnote-autoloads forms-autoloads
            frame-icon-autoloads fsf-compat-autoloads
            games-autoloads gnats-autoloads gnus-autoloads
            hm--html-menus-autoloads ibuffer-autoloads
            idlwave-autoloads igrep-autoloads
            ilisp-autoloads ispell-autoloads jde-autoloads
            liece-autoloads mail-lib-autoloads
            mailcrypt-autoloads mew-autoloads
            mh-e-autoloads mine-autoloads
            misc-games-autoloads mmm-mode-autoloads
            net-utils-autoloads os-utils-autoloads
            pc-autoloads pcl-cvs-autoloads
            pcomplete-autoloads prog-modes-autoloads
            ps-print-autoloads psgml-autoloads
            reftex-autoloads rmail-autoloads
            scheme-autoloads semantic-autoloads
            sgml-autoloads sh-script-autoloads
            sieve-autoloads slider-autoloads
            sounds-au-autoloads sounds-wav-autoloads
            speedbar-autoloads strokes-autoloads
            supercite-autoloads texinfo-autoloads
            te


-- 
Silas S Brown, St John's College Cambridge UK http://www.cus.cam.ac.uk/~ssb22
Replace nospam with ssb22 to reply by email

My software never has bugs.  It just develops undocumented features.