From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/87380 Path: news.gmane.org!.POSTED!not-for-mail From: Eric Abrahamsen Newsgroups: gmane.emacs.gnus.general Subject: Re: registry and the gnus-summary-line-format Date: Tue, 21 Feb 2017 08:28:13 -0800 Message-ID: <878toztso2.fsf@ericabrahamsen.net> References: <87wpcl3lee.fsf@mat.ucm.es> <87fuj96589.fsf@ericabrahamsen.net> <87y3wzhhwi.fsf@mat.ucm.es> NNTP-Posting-Host: blaine.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: blaine.gmane.org 1487694571 7552 195.159.176.226 (21 Feb 2017 16:29:31 GMT) X-Complaints-To: usenet@blaine.gmane.org NNTP-Posting-Date: Tue, 21 Feb 2017 16:29:31 +0000 (UTC) User-Agent: Gnus/5.130014 (Ma Gnus v0.14) Emacs/26.0 (gnu/linux) To: ding@gnus.org Original-X-From: ding-owner+m35601@lists.math.uh.edu Tue Feb 21 17:29:26 2017 Return-path: Envelope-to: ding-account@gmane.org Original-Received: from mxfilter-048035.atla03.us.yomura.com ([107.189.48.35]) by blaine.gmane.org with esmtp (Exim 4.84_2) (envelope-from ) id 1cgDJd-0001Oj-Cx for ding-account@gmane.org; Tue, 21 Feb 2017 17:29:25 +0100 X-Yomura-MXScrub: 1.0 Original-Received: from lists1.math.uh.edu (unknown [129.7.128.208]) by mxfilter-048035.atla03.us.yomura.com (Halon) with ESMTPS id ea5b8264-f852-11e6-b156-b499baabecb2; Tue, 21 Feb 2017 16:29:28 +0000 (UTC) Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu) by lists1.math.uh.edu with smtp (Exim 4.87) (envelope-from ) id 1cgDIr-0005RK-Oc; Tue, 21 Feb 2017 10:28:37 -0600 Original-Received: from mx2.math.uh.edu ([129.7.128.33]) by lists1.math.uh.edu with esmtps (TLSv1.2:ECDHE-RSA-AES256-GCM-SHA384:256) (Exim 4.87) (envelope-from ) id 1cgDIq-0005Qo-6D for ding@lists.math.uh.edu; Tue, 21 Feb 2017 10:28:36 -0600 Original-Received: from quimby.gnus.org ([80.91.231.51]) by mx2.math.uh.edu with esmtps (TLSv1.2:DHE-RSA-AES128-SHA:128) (Exim 4.87) (envelope-from ) id 1cgDIo-00077g-B0 for ding@lists.math.uh.edu; Tue, 21 Feb 2017 10:28:36 -0600 Original-Received: from [195.159.176.226] (helo=blaine.gmane.org) by quimby.gnus.org with esmtps (TLS1.2:RSA_AES_128_CBC_SHA1:128) (Exim 4.80) (envelope-from ) id 1cgDIm-0003rU-VX for ding@gnus.org; Tue, 21 Feb 2017 17:28:33 +0100 Original-Received: from list by blaine.gmane.org with local (Exim 4.84_2) (envelope-from ) id 1cgDIV-0005Al-Bi for ding@gnus.org; Tue, 21 Feb 2017 17:28:15 +0100 X-Injected-Via-Gmane: http://gmane.org/ Original-Lines: 66 Original-X-Complaints-To: usenet@blaine.gmane.org Cancel-Lock: sha1:6JDlN4jTlR0K6f87cOR4x+8Y9EE= List-ID: Precedence: bulk Xref: news.gmane.org gmane.emacs.gnus.general:87380 Archived-At: Uwe Brauer writes: > > Uwe Brauer writes: > > > I'm not entirely sure what you're asking, but you have two options here: > > set a global gnus-summary-line-format variable, that applies to all > > groups, and also set a per-group (ie "group local") summary line that > > only applies to that one group, and overrides the global value. > > > In the customization "screenshots" above, the top entry is specific to > > one group. The second is the value that applies to all groups. > > > If that doesn't clear things up, you might need to rephrase your > > question! > > Ok, I was mistaken. I want gnus-summary-line-format to be different for > my mail and the newsgroup. [...] > However the registry does not work that is I set > Variables: > Set variables local to the group you are entering. More > INS DEL Variable: gnus-summary-line-format > Value: > "[%uM]%U%R%z%I%N %(%[ %-10,10uB%]%) %-10,10~(form (rfc2047-decode-string (gnus-extra-header 'To)))@ [%-25,25s%] %D %k %L \n" > INS > > Note the [] > > then the messages after restart are displayed such as > []O 36485 [ Uwe Braue] Uwe Brauer [courier ] Mon, 20 Feb 2017 23:04:28 +0000 9k 21 > > > But when I want to add a registry label I obtain that error: > > Debugger entered--Lisp error: (wrong-type-argument sequencep 116) > mapconcat(#[(mark) "\302\303 \"\243\304\"\207" [mark gnus-registry-marks plist-get assoc :char] 4] (To-Do) "") The error is in: #+BEGIN_SRC elisp (defun gnus-registry-article-marks-to-chars (headers) "Show the marks for an article by the :char property." (let* ((id (mail-header-message-id headers)) (marks (when id (gnus-registry-get-id-key id 'mark)))) (mapconcat (lambda (mark) (plist-get (cdr-safe (assoc mark gnus-registry-marks)) :char)) marks ""))) #+END_SRC It's trying to mapconcat a bare character (116 or ?t), but mapconcat requires a string or a list of characters. I don't see how this ever would have worked, to be honest. Git blame says the code's been like this since 2011, but supposedly mapconcat started barfing on integer arguments in Emacs 21.1, in 2001. Anyhow, wrapping the `plist-get' in a `char-to-string' (or just `list') will fix it. I can open a bug report in a bit, if no one leaps in and fixes it. Eric