From: Jean Louis <bugs@gnu.support>
To: Lars Ingebrigtsen <larsi@gnus.org>
Cc: 24824@debbugs.gnu.org, Jean Louis <bugs@gnu.support>
Subject: bug#24824: 26.0.50; error in process filter: Symbol’s function definition is void: mm-decode-coding-region
Date: Sun, 30 Oct 2016 10:35:20 +0200 [thread overview]
Message-ID: <20161030083520.GB6668@protected.rcdrun.com> (raw)
In-Reply-To: <m3k2cqs1wg.fsf@gnus.org>
Debugger entered--Lisp error: (void-function mm-decode-coding-region)
(mm-decode-coding-region (point-min) (point-max) coding-system)
(progn (mm-decode-coding-region (point-min) (point-max) coding-system) (set-buffer-file-coding-system coding-system))
(if (and (featurep (quote mule)) (if (boundp (quote default-enable-multibyte-characters)) default-enable-multibyte-characters t) coding-system) (progn (mm-decode-coding-region (point-min) (point-max) coding-system) (set-buffer-file-coding-system coding-system)))
(save-excursion (if encoding (mm-decode-content-transfer-encoding encoding type)) (if (and (featurep (quote mule)) (if (boundp (quote default-enable-multibyte-characters)) default-enable-multibyte-characters t) coding-system) (progn (mm-decode-coding-region (point-min) (point-max) coding-system) (set-buffer-file-coding-system coding-system))))
(let* ((encoding (nth 2 handle)) (charset (or w3-explicit-coding-system (mail-content-type-get (nth 1 handle) (quote charset)) "iso-8859-1")) (type (mm-handle-media-type handle)) (coding-system (mm-charset-to-coding-system charset))) (if (or (not coding-system) (eq coding-system (quote ascii))) (setq coding-system (quote undecided))) (save-excursion (if encoding (mm-decode-content-transfer-encoding encoding type)) (if (and (featurep (quote mule)) (if (boundp (quote default-enable-multibyte-characters)) default-enable-multibyte-characters t) coding-system) (progn (mm-decode-coding-region (point-min) (point-max) coding-system) (set-buffer-file-coding-system coding-system)))) coding-system)
w3-decode-charset((#<buffer *mm*-849047> ("text/html" (charset . "utf-8")) nil nil nil nil nil nil))
(cond ((or (equal (mm-handle-media-type handle) "text/html") (equal (mm-handle-media-type handle) "application/xhtml+xml")) (set-buffer (generate-new-buffer " *w3-html*")) (mm-insert-part handle) (w3-decode-charset handle) (setq url-current-object (url-generic-parse-url url)) (w3-prepare-buffer) (setq url-current-mime-headers headers) (w3-notify-when-ready (current-buffer)) (mm-destroy-parts handle)) ((equal (car-safe (nth 1 handle)) "application/x-elisp-parsed-html") (w3-prepare-tree (read (set-marker (make-marker) 1 (nth 0 handle))))) ((mm-inlinable-p handle) (set-buffer (generate-new-buffer url)) (require (quote mm-view)) (mm-display-part handle) (set-buffer-modified-p nil) (w3-mode) (if (equal "image" (mm-handle-media-supertype handle)) (setq cursor-type nil)) (setq url-current-mime-headers headers) (w3-notify-when-ready (current-buffer))) (t (mm-display-part handle)))
(let ((handle (mm-dissect-buffer t)) (w3-explicit-coding-system (or w3-explicit-coding-system (w3-recall-explicit-coding-system url)))) (message "Downloading of `%s' complete." url) (url-mark-buffer-as-dead (current-buffer)) (if headers nil (setq headers (list (cons (quote content-type) (mm-handle-media-type handle))))) (cond ((or (equal (mm-handle-media-type handle) "text/html") (equal (mm-handle-media-type handle) "application/xhtml+xml")) (set-buffer (generate-new-buffer " *w3-html*")) (mm-insert-part handle) (w3-decode-charset handle) (setq url-current-object (url-generic-parse-url url)) (w3-prepare-buffer) (setq url-current-mime-headers headers) (w3-notify-when-ready (current-buffer)) (mm-destroy-parts handle)) ((equal (car-safe (nth 1 handle)) "application/x-elisp-parsed-html") (w3-prepare-tree (read (set-marker (make-marker) 1 (nth 0 handle))))) ((mm-inlinable-p handle) (set-buffer (generate-new-buffer url)) (require (quote mm-view)) (mm-display-part handle) (set-buffer-modified-p nil) (w3-mode) (if (equal "image" (mm-handle-media-supertype handle)) (setq cursor-type nil)) (setq url-current-mime-headers headers) (w3-notify-when-ready (current-buffer))) (t (mm-display-part handle))))
(let (headers) (condition-case nil (progn (save-restriction (mail-narrow-to-head) (goto-char (point-min)) (if (save-excursion (search-forward ":" (line-end-position) t)) nil (forward-line)) (setq headers (mail-header-extract)) (let (refreshed) (let ((--dolist-tail-- headers) header) (while --dolist-tail-- (setq header ...) (let* ... ...) (setq --dolist-tail-- ...)))))) (error nil)) (let ((handle (mm-dissect-buffer t)) (w3-explicit-coding-system (or w3-explicit-coding-system (w3-recall-explicit-coding-system url)))) (message "Downloading of `%s' complete." url) (url-mark-buffer-as-dead (current-buffer)) (if headers nil (setq headers (list (cons (quote content-type) (mm-handle-media-type handle))))) (cond ((or (equal (mm-handle-media-type handle) "text/html") (equal (mm-handle-media-type handle) "application/xhtml+xml")) (set-buffer (generate-new-buffer " *w3-html*")) (mm-insert-part handle) (w3-decode-charset handle) (setq url-current-object (url-generic-parse-url url)) (w3-prepare-buffer) (setq url-current-mime-headers headers) (w3-notify-when-ready (current-buffer)) (mm-destroy-parts handle)) ((equal (car-safe (nth 1 handle)) "application/x-elisp-parsed-html") (w3-prepare-tree (read (set-marker (make-marker) 1 (nth 0 handle))))) ((mm-inlinable-p handle) (set-buffer (generate-new-buffer url)) (require (quote mm-view)) (mm-display-part handle) (set-buffer-modified-p nil) (w3-mode) (if (equal "image" (mm-handle-media-supertype handle)) (setq cursor-type nil)) (setq url-current-mime-headers headers) (w3-notify-when-ready (current-buffer))) (t (mm-display-part handle)))))
w3-fetch-callback("http://elpa.gnu.org/packages/w3.html")
(let (redirect-url) (cond ((listp (car args)) (let ((status (car args))) (if (eq (car status) :error) (progn (setq status (cdr ...)))) (if (eq (car status) :redirect) (progn (setq redirect-url (car ...)))) (setq args (cdr args)))) ((eq (car args) :redirect) (setq redirect-url (car (cdr args))) (while (eq (car args) :redirect) (setq args (cdr (cdr args)))))) (w3-fetch-callback (or redirect-url (car args))))
w3-fetch-redirect-callback(nil "http://elpa.gnu.org/packages/w3.html")
apply(w3-fetch-redirect-callback (nil "http://elpa.gnu.org/packages/w3.html"))
url-http-activate-callback()
url-http-content-length-after-change-function(324 1234 910)
url-http-wait-for-headers-change-function(1 1247 1246)
url-http-generic-filter(#<process elpa.gnu.org> "HTTP/1.1 200 OK\r\nDate: Sun, 30 Oct 2016 08:57:55 GMT\r\nServer: Apache/2.4.10 (Debian)\r\nLast-Modified: Sat, 29 Oct 2016 21:03:22 GMT\r\nETag: \"659-540074e10ca8c-gzip\"\r\nAccept-Ranges: bytes\r\nVary: Accept-Encoding\r\nContent-Encoding: gzip\r\nContent-Length: 909\r\nKeep-Alive: timeout=5, max=100\r\nConnection: Keep-Alive\r\nContent-Type: text/html\r\n\r\n\x1f\213\b\0\0\0\0\0\0\x03\215T\301r\333F\f\275\363+P\236\332\x19\223\264\244$ul\221\251-9Ng\344\3043U\246\323\343\222\204\310M\226\\f\x17\224\254~}\201\225lG\315%'\211\330\x05\x1e\360\336[\314\x7fY~Z\254\377y\270\205\x0f\353\373\x15<|\276Y\375\271\2008\311\262\277g\213,[\256\227\207\203Y:\205\367\272W&\313n?\306E4o\2513\362\203\252.\"\2009i2X\334}\374\f\267\253\207kH`7\233g\207\240\x1cwH\nZ\242!\301o\243\336\346\361\302\366\204=%\353\375\2001T\207\257<&|\244Lj_A\325*\347\221\362\2216\311\205@f\a\260yi\353\275@O@\x19\335\364y\\q*\272\370\377\350\355\204o\r\305\x12}\345\364@\332\366\227\360~4f\x0f\325\350\311v\372_U\x1a<\x03\243\\\203\x1c\x1d\373\332Vc'\305j\330a \245\263;\217\x0e6\326\301m\247*?\317\206Pr\245\b=]\302\234gr\270\311\343\335,y\225\236\247\257\336\246\244\270\221\223\317y\246\2123\230\236Of\311\365\330$\3237g0I\x7f?\277\277y\252\366\301v\b\203j\360\273\202B\325e\226\241\x19T\332\364cj]\223\r\252\372\312\267|\266\233\245BQ\\\374\314-\201\x7fB\272 \x03\201\303\301zM\326\355\x7fDl4\245^mU\337\253\366\271f\305\321\f\205\201#\x16\x7f\276ks\326\n\x1d{B\260\342bq\247I\300\200\331\372\251\252\x1cd\226\263wC~Z\372J\345\276\265\216\214m\256\332\234\313\370\240<_8\301\273\v\351/\343\265\323B\324\205\372Eo\366\300\264\230\x0f\216=\x18\364cS\203\366\240N\324\3359Ml>`\335\265\x13\x1f\350\376\2406\254\264\x1fR\200k\x0f~\254\3323\320\x04\255\362\321\330\353o#\202'\207}C-\327\353k\250\235\332\225L\275\347\204u{r\352\204q\243\304Ud\271\210g\x04\302\306)i1\332ij\x0fxW@\234\370\\($R\253Hp\271\353PCo\245Co\354.\240z\266\x0e\351\x0e}T\x1a+9{;:\300Z\223\356^[\360\350=CpGK\344<;\210\267e\x04(\221\a\256\255\353\x14\a\304\336\212\237\3408\x18\x04\273\211\366\310\x0f\357\214k\x03>\x0eX\x11\224c\343\241\346\221\271\375\222\233q\226\322\350\301\240:z\311\x1d\257l\265\202\373\344\361\x18K\202\252 \237\244Q\264ny\202@\375\x16\335\236+\214M\313\236\367\x1c\2410\266(\302\236D\370\265\334\207\200u\272\221\205\x03j$v\303o\360\205\x1f-w\x105Han\276%U\230\316\332\356\372@\207\252*\x19\231_\265\264\332Y&p@\313c\x1dE\x19\234\375\"\x03\311c\203?\242\277\216\216\f\224(\330(\355\230\334\232W\2256\"\226\362_\301hO\342\x01\266\213\306\315\367\346b\252\0U\325F\225\355\x06\333\v\265\241\207\220\"\207l\x12/\x17\203A2&\331\241gy\270\305S?@\247\366\254H\264\261\274\201\304}2\376\306\x1a\x16YT|ZJ\236id\247\213\231\305\353\237L-\\\212\300\376\340s\222u\x06\x15\x1a~Gu\315\251y<\213\241\264\256F\227\307\x13Y\241\344\370Z]\374\260\267.N\367\326\305\323\336\342\x15^\207\214\227\365\365\37296I\337\274\225-F\262\224\263\200.\x7f\x0e\353\371?\330\354F\355Y\x06\0\0")
next prev parent reply other threads:[~2016-10-30 8:35 UTC|newest]
Thread overview: 5+ messages / expand[flat|nested] mbox.gz Atom feed top
2016-10-30 7:53 bug#24824: 26.0.50; error in process filter: Symbol’s function definition is void: mm-decode-coding-region Jean Louis
2016-10-30 7:59 ` Lars Ingebrigtsen
2016-10-30 8:17 ` Andreas Schwab
2016-10-30 8:35 ` Jean Louis [this message]
2016-10-30 8:58 ` Lars Ingebrigtsen
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=20161030083520.GB6668@protected.rcdrun.com \
--to=bugs@gnu.support \
--cc=24824@debbugs.gnu.org \
--cc=larsi@gnus.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).