[gnus git] branch master updated: n0-17-48-g22d5689 =1= * gnus-registry.el (gnus-registry-user-format-function-M2): Make "," the mark text separator.

       via  22d56892d2ac2c5ee70fb555bcd26e34f6754f7b (commit)
      from  e315c595c678b5254c37612d6e0a939ba48ac664 (commit)


- Log -----------------------------------------------------------------
commit 22d56892d2ac2c5ee70fb555bcd26e34f6754f7b
Author: Ted Zlatanov <[email protected]>
Date:   Wed May 18 16:10:25 2011 -0500

    * gnus-registry.el (gnus-registry-user-format-function-M2): Make "," the mark text separator.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9ebcf3b..5f89356 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -2,7 +2,7 @@
 
 	* gnus-registry.el (gnus-registry-user-format-function-M): Use `mapconcat'.
 	(gnus-registry-user-format-function-M2): Use to see the full text of
-	the marks.
+	the marks.  Make "," the mark text separator.
 
 	* nntp.el (nntp-send-authinfo): Use the "force" token for NNTP
 	authentication with auth-source.
diff --git a/lisp/gnus-registry.el b/lisp/gnus-registry.el
index 7d24168..e0efbaf 100644
--- a/lisp/gnus-registry.el
+++ b/lisp/gnus-registry.el
@@ -916,7 +916,7 @@ Uses `gnus-registry-marks' to find what shortcuts to install."
   "Show the marks for an article by name"
   (let* ((id (mail-header-message-id headers))
          (marks (when id (gnus-registry-get-id-key id 'mark))))
-    (mapconcat (lambda (mark) (symbol-name mark)) marks "")))
+    (mapconcat (lambda (mark) (symbol-name mark)) marks ",")))
 
 (defun gnus-registry-read-mark ()
   "Read a mark name from the user with completion."

-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.

Summary of changes:
 lisp/ChangeLog        |    2 +-
 lisp/gnus-registry.el |    2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".

The branch, master has been updated


hooks/post-receive
-- 
Gnus Project