From unknown Thu Sep 11 09:00:08 2025 X-Loop: help-debbugs@gnu.org Subject: bug#9632: wrong-type-argument stringp mailcap-save-binary-file Resent-From: Dave Abrahams Original-Sender: debbugs-submit-bounces@debbugs.gnu.org Resent-CC: bugs@gnus.org Resent-Date: Thu, 29 Sep 2011 20:08:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 9632 X-GNU-PR-Package: gnus X-GNU-PR-Keywords: To: 9632@debbugs.gnu.org X-Debbugs-Original-To: submit@debbugs.gnu.org (The Gnus Bugfixing Girls + Boys) Received: via spool by submit@debbugs.gnu.org id=B.131732688126348 (code B ref -1); Thu, 29 Sep 2011 20:08:01 +0000 Received: (at submit) by debbugs.gnu.org; 29 Sep 2011 20:08:01 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1R9Mtk-0006qv-LM for submit@debbugs.gnu.org; Thu, 29 Sep 2011 16:08:00 -0400 Received: from mail-vx0-f172.google.com ([209.85.220.172]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1R9Mth-0006qn-NN for submit@debbugs.gnu.org; Thu, 29 Sep 2011 16:07:59 -0400 Received: by vcbfo11 with SMTP id fo11so807617vcb.3 for ; Thu, 29 Sep 2011 13:06:55 -0700 (PDT) Received: by 10.52.70.83 with SMTP id k19mr6014465vdu.224.1317326815169; Thu, 29 Sep 2011 13:06:55 -0700 (PDT) Received: from pluto.luannocracy.com (207-172-223-249.c3-0.smr-ubr3.sbo-smr.ma.static.cable.rcn.com. [207.172.223.249]) by mx.google.com with ESMTPS id be17sm2553977vdc.15.2011.09.29.13.06.54 (version=TLSv1/SSLv3 cipher=OTHER); Thu, 29 Sep 2011 13:06:54 -0700 (PDT) Received: by pluto.luannocracy.com (Postfix, from userid 501) id 80321101A6F7; Thu, 29 Sep 2011 16:06:53 -0400 (EDT) From: Dave Abrahams Date: Thu, 29 Sep 2011 16:06:53 -0400 Message-ID: User-Agent: Gnus/5.110018 (No Gnus v0.18) Emacs/23.3 (darwin) MIME-Version: 1.0 Content-Type: text/plain Content-Transfer-Encoding: quoted-printable X-Spam-Score: -3.9 (---) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -3.9 (---) I just tried to hit `v' on a PGP key (with an .asc suffix) and BOOM. --8<---------------cut here---------------start------------->8--- Debugger entered--Lisp error: (wrong-type-argument stringp mailcap-save-bin= ary-file) string-match("" mailcap-save-binary-file) (and (or non-prefix-dot (if ... ... ...)) (string-match re name)) (if (and (or non-prefix-dot ...) (string-match re name)) (cond (... ...) = (... ...) (... ...) (... ...) (t ...))) (let ((name ...)) (if (and ... ...) (cond ... ... ... ... ...))) (lambda (item) (let (...) (if ... ...)) t)(mailcap-save-binary-file) mapc((lambda (item) (let (...) (if ... ...)) t) ("/usr/bin/open %s" mailc= ap-save-binary-file)) (condition-case error (mapc (lambda ... ... t) items) (invalid-regexp (se= tq ido-incomplete-regexp t matches ...))) (let* ((case-fold-search ido-case-fold) (slash ...) (text ...) (rex0 ...)= (rexq ...) (re ...) (full-re ...) (suffix-re ...) (prefix-re ...) (non-pre= fix-dot ...) full-matches suffix-matches prefix-matches matches) (setq ido-= incomplete-regexp nil) (condition-case error (mapc ... items) (invalid-rege= xp ...)) (when prefix-matches (ido-trace "prefix match" prefix-matches) (se= tq matches ...)) (when suffix-matches (ido-trace "suffix match" ...) (setq = matches ...)) (when full-matches (ido-trace "full match" ...) (setq matches= ...)) (when (and ... ido-enable-flex-matching ... ...) (setq re ...) (if i= do-enable-prefix ...) (mapc ... items)) matches) ido-set-matches-1(("/usr/bin/open %s" mailcap-save-binary-file) t) (setq ido-matches (ido-set-matches-1 (reverse ido-cur-list) (not ido-rota= te)) ido-rotate nil) (progn (setq ido-matches (ido-set-matches-1 ... ...) ido-rotate nil)) (if ido-rescan (progn (setq ido-matches ... ido-rotate nil))) (when ido-rescan (setq ido-matches (ido-set-matches-1 ... ...) ido-rotate= nil)) ido-set-matches() (while (not done) (ido-trace "\n_LOOP_" ido-text-init) (setq ido-exit nil= ) (setq ido-rescan t) (setq ido-rotate nil) (setq ido-text "") (when ido-se= t-default-item (setq ido-default-item ...) (if ... ...) (ido-trace "new def= ault" ido-default-item) (if ido-default-item ...) (setq ido-set-default-ite= m nil)) (if ido-process-ignore-lists-inhibit (setq ido-process-ignore-lists= nil)) (if (and ido-use-merged-list ... ...) (let ... ... ...)) (cond (ido-= keep-item-list ...) (... ...) (... ...) (... ...) (... ...) (t nil)) (setq = ido-rotate-temp nil) (if ido-process-ignore-lists-inhibit (setq ido-process= -ignore-lists t ido-process-ignore-lists-inhibit nil)) (ido-set-matches) (i= f (and ido-matches ...) (setq ido-try-merged-list t)) (let (... ... ... ...= ... ...) (setq ido-exit nil) (setq ido-final-text ...)) (ido-trace "read-f= rom-minibuffer" ido-final-text) (if (get-buffer ido-completion-buffer) (kil= l-buffer ido-completion-buffer)) (ido-trace "\n_EXIT_" ido-exit) (cond (...= ... nil) (... ...) (... ... nil) (... ...) (... ...) (... ...) (... ... ..= .) (... ... ...) (... ...) (t ... ...))) (let ((ido-cur-item item) (ido-entry-buffer ...) (ido-process-ignore-list= s t) (ido-process-ignore-lists-inhibit nil) (ido-set-default-item t) ido-de= fault-item ido-selected ido-final-text (done nil) (icomplete-mode nil) ido-= cur-list ido-ignored-list (ido-rotate-temp nil) (ido-keep-item-list nil) (i= do-use-merged-list nil) (ido-try-merged-list t) (ido-pre-merge-state nil) (= ido-case-fold ido-case-fold) (ido-enable-prefix ido-enable-prefix) (ido-ena= ble-regexp ido-enable-regexp) (ido-show-confirm-message nil)) (ido-setup-co= mpletion-map) (setq ido-text-init initial) (setq ido-input-stack nil) (run-= hooks (quote ido-setup-hook)) (while (not done) (ido-trace "\n_LOOP_" ido-t= ext-init) (setq ido-exit nil) (setq ido-rescan t) (setq ido-rotate nil) (se= tq ido-text "") (when ido-set-default-item ... ... ... ... ...) (if ido-pro= cess-ignore-lists-inhibit ...) (if ... ...) (cond ... ... ... ... ... ...) = (setq ido-rotate-temp nil) (if ido-process-ignore-lists-inhibit ...) (ido-s= et-matches) (if ... ...) (let ... ... ...) (ido-trace "read-from-minibuffer= " ido-final-text) (if ... ...) (ido-trace "\n_EXIT_" ido-exit) (cond ... ..= . ... ... ... ... ... ... ... ...)) (add-to-history (or history ...) ido-se= lected) ido-selected) ido-read-internal(list "Viewer: " nil nil nil nil) (let ((ido-current-directory nil) (ido-directory-nonreadable nil) (ido-di= rectory-too-big nil) (ido-context-switch-command ...) (ido-choice-list choi= ces)) (ido-common-initialization) (ido-read-internal (quote list) prompt hi= st def require-match initial-input)) ido-completing-read("Viewer: " (mailcap-save-binary-file "/usr/bin/open %= s") nil nil nil nil nil) gnus-ido-completing-read("Viewer: " (mailcap-save-binary-file "/usr/bin/o= pen %s") nil nil nil nil) gnus-completing-read("Viewer" (mailcap-save-binary-file "/usr/bin/open %s= ")) mm-interactively-view-part((#> ("application/octet-stream= ") base64 nil ("attachment" (filename . "0F31DE07 - Personal.asc")) nil nil= nil)) gnus-mime-view-part() call-interactively(gnus-mime-view-part nil nil) --8<---------------cut here---------------end--------------->8--- No Gnus v0.18 GNU Emacs 23.3.1 (x86_64-apple-darwin10.8.0, Carbon Version 1.6.0 AppKit 10= 38.36) of 2011-09-12 on pluto.luannocracy.com 200 Leafnode NNTP Daemon, version 1.11.8 running at localhost (my fqdn: plu= to.boostpro.com) 500 Unknown command --=20 Dave Abrahams BoostPro Computing http://www.boostpro.com From unknown Thu Sep 11 09:00:08 2025 X-Loop: help-debbugs@gnu.org Subject: bug#9632: wrong-type-argument stringp mailcap-save-binary-file Resent-From: Lars Magne Ingebrigtsen Original-Sender: debbugs-submit-bounces@debbugs.gnu.org Resent-CC: bugs@gnus.org Resent-Date: Sat, 07 Jan 2012 01:08:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 9632 X-GNU-PR-Package: gnus X-GNU-PR-Keywords: To: Dave Abrahams Cc: 9632@debbugs.gnu.org Received: via spool by 9632-submit@debbugs.gnu.org id=B9632.132589848111483 (code B ref 9632); Sat, 07 Jan 2012 01:08:02 +0000 Received: (at 9632) by debbugs.gnu.org; 7 Jan 2012 01:08:01 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1RjKlM-0002z8-Sv for submit@debbugs.gnu.org; Fri, 06 Jan 2012 20:08:01 -0500 Received: from hermes.netfonds.no ([80.91.224.195]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1RjKlL-0002z1-4h for 9632@debbugs.gnu.org; Fri, 06 Jan 2012 20:08:00 -0500 Received: from cm-84.215.51.58.getinternet.no ([84.215.51.58] helo=stories.gnus.org) by hermes.netfonds.no with esmtpsa (TLS1.0:DHE_RSA_AES_128_CBC_SHA1:16) (Exim 4.72) (envelope-from ) id 1RjKhh-0007qW-SS; Sat, 07 Jan 2012 02:04:13 +0100 From: Lars Magne Ingebrigtsen References: X-Now-Playing: The Black Dog's _Liber Dogma_: "Feeder Rub Out" Date: Sat, 07 Jan 2012 02:04:13 +0100 In-Reply-To: (Dave Abrahams's message of "Thu, 29 Sep 2011 16:06:53 -0400") Message-ID: User-Agent: Gnus/5.110018 (No Gnus v0.18) Emacs/24.0.92 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain X-MailScanner-ID: 1RjKhh-0007qW-SS X-Netfonds-MailScanner: Found to be clean X-Netfonds-MailScanner-From: larsi@gnus.org MailScanner-NULL-Check: 1326503054.196@WQ2bUs/ESs5yvi1ptzWpvg X-Spam-Status: No X-Spam-Score: -2.6 (--) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -2.6 (--) Dave Abrahams writes: > gnus-completing-read("Viewer" (mailcap-save-binary-file "/usr/bin/open %s")) > mm-interactively-view-part((#> ("application/octet-stream") base64 nil ("attachment" (filename . "0F31DE07 - Personal.asc")) nil nil nil)) > gnus-mime-view-part() I'm unable to reproduce the bug. Looking at the code, it seems like the following is returning something... something doesn't like: (mapcar (lambda (i) (cdr (assoc 'viewer i))) (mailcap-mime-info "application/octet-stream" 'all)) => (mailcap-save-binary-file) (Only that yours includes the "open" thing, too. Hm... string-match("" mailcap-save-binary-file) [...] ido-set-matches-1(("/usr/bin/open %s" mailcap-save-binary-file) t) Oh, you're triggering ido... Right: gnus-ido-completing-read("Viewer: " (mailcap-save-binary-file "/usr/bin/open %s") nil nil nil nil) gnus-completing-read("Viewer" (mailcap-save-binary-file "/usr/bin/open %s")) And ido doesn't work on symbols. Fix in No Gnus. -- (domestic pets only, the antidote for overdose, milk.) bloggy blog http://lars.ingebrigtsen.no/ From debbugs-submit-bounces@debbugs.gnu.org Fri Jan 06 20:08:04 2012 Received: (at control) by debbugs.gnu.org; 7 Jan 2012 01:08:04 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1RjKlP-0002zh-Ou for submit@debbugs.gnu.org; Fri, 06 Jan 2012 20:08:04 -0500 Received: from hermes.netfonds.no ([80.91.224.195]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1RjKlN-0002z9-Tc for control@debbugs.gnu.org; Fri, 06 Jan 2012 20:08:02 -0500 Received: from cm-84.215.51.58.getinternet.no ([84.215.51.58] helo=stories.gnus.org) by hermes.netfonds.no with esmtpsa (TLS1.0:DHE_RSA_AES_128_CBC_SHA1:16) (Exim 4.72) (envelope-from ) id 1RjKhl-0007qe-Ps for control@debbugs.gnu.org; Sat, 07 Jan 2012 02:04:17 +0100 Date: Sat, 07 Jan 2012 02:04:17 +0100 Message-Id: To: control@debbugs.gnu.org From: Lars Magne Ingebrigtsen Subject: control message for bug #9632 X-MailScanner-ID: 1RjKhl-0007qe-Ps X-Netfonds-MailScanner: Found to be clean X-Netfonds-MailScanner-From: larsi@gnus.org MailScanner-NULL-Check: 1326503058.07051@ctEqytERIUBQiYyin8sNyw X-Spam-Status: No X-Spam-Score: -2.6 (--) X-Debbugs-Envelope-To: control X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -2.6 (--) tags 9632 fixed close 9632 24.1