From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/87382 Path: news.gmane.org!.POSTED!not-for-mail From: Uwe Brauer Newsgroups: gmane.emacs.gnus.general Subject: Re: registry and the gnus-summary-line-format Date: Tue, 21 Feb 2017 18:23:20 +0000 Message-ID: <87wpcjflnr.fsf@mat.ucm.es> References: <87wpcl3lee.fsf@mat.ucm.es> <87fuj96589.fsf@ericabrahamsen.net> <87y3wzhhwi.fsf@mat.ucm.es> <878toztso2.fsf@ericabrahamsen.net> NNTP-Posting-Host: blaine.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: blaine.gmane.org 1487701534 31696 195.159.176.226 (21 Feb 2017 18:25:34 GMT) X-Complaints-To: usenet@blaine.gmane.org NNTP-Posting-Date: Tue, 21 Feb 2017 18:25:34 +0000 (UTC) User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.0.50 (gnu/linux) To: ding@gnus.org Original-X-From: ding-owner+m35603@lists.math.uh.edu Tue Feb 21 19:25:28 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 1cgF7p-0007DP-AF for ding-account@gmane.org; Tue, 21 Feb 2017 19:25:21 +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 1cf2196b-f863-11e6-b156-b499baabecb2; Tue, 21 Feb 2017 18:25:25 +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 1cgF7n-0006Qg-UF; Tue, 21 Feb 2017 12:25:19 -0600 Original-Received: from mx1.math.uh.edu ([129.7.128.32]) by lists1.math.uh.edu with esmtps (TLSv1.2:ECDHE-RSA-AES256-GCM-SHA384:256) (Exim 4.87) (envelope-from ) id 1cgF7m-0006QB-M5 for ding@lists.math.uh.edu; Tue, 21 Feb 2017 12:25:18 -0600 Original-Received: from quimby.gnus.org ([80.91.231.51]) by mx1.math.uh.edu with esmtps (TLSv1.2:DHE-RSA-AES128-SHA:128) (Exim 4.87) (envelope-from ) id 1cgF7l-0003p6-5M for ding@lists.math.uh.edu; Tue, 21 Feb 2017 12:25:18 -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 1cgF7j-0005BT-Oc for ding@gnus.org; Tue, 21 Feb 2017 19:25:15 +0100 Original-Received: from list by blaine.gmane.org with local (Exim 4.84_2) (envelope-from ) id 1cgF7Y-000629-7s for ding@gnus.org; Tue, 21 Feb 2017 19:25:04 +0100 X-Injected-Via-Gmane: http://gmane.org/ Mail-Followup-To: ding@gnus.org Original-Lines: 56 Original-X-Complaints-To: usenet@blaine.gmane.org Mail-Copies-To: never Cancel-Lock: sha1:A3Wbma5BK/hxB1/iFK/lH2X5yrE= List-ID: Precedence: bulk Xref: news.gmane.org gmane.emacs.gnus.general:87382 Archived-At: > Uwe Brauer writes: > [...] > 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 I tried out (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 (list (cdr-safe (assoc mark gnus-registry-marks))) :char)) marks ""))) And the following gnus-summary format "[%uM]%U%R%z%I%N %(%[ %-10,10uB%]%) %-10,10~(form (rfc2047-decode-string (gnus-extra-header 'To)))@ [%-25,25s%] %D %k %L \n" The good thing is the error is gone! The bad this is the label of say M M t is not displayed I see []O 36485 [ Uwe Braue] Uwe Brauer [courier ] Mon, 20 Feb 2017 23:04:28 +0000 9k 21 But I should see [T]O 36485 [ Uwe Braue] Uwe Brauer [courier ] Mon, 20 Feb 2017 23:04:28 +0000 9k 21 Or something like this, what do I miss? Uwe