From: Stephen Eglen <stephen@gnu.org>
Date: Tue, 22 Jul 2008 08:47:00 +0000 (+0000)
Subject: (iswitchb-delim): New variable, suggested by Ted Roden.
X-Git-Tag: emacs-pretest-23.0.90~4000
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6a0e4c608b39e90e2997808b1cca7909edbe5b3f;p=emacs.git

(iswitchb-delim): New variable, suggested by Ted Roden.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3ec840f687a..bfa524d6f06 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2008-07-22  Stephen Eglen  <stephen@gnu.org>
+
+	* iswitchb.el (iswitchb-delim): New variable, suggested by Ted
+	Roden.
+
 2008-07-22  Sven Joachim <svenjoac@gmx.de>  (tiny change)
 
 	* vc-dir.el (vc-dir-recompute-file-state): Fix mismatched
diff --git a/lisp/iswitchb.el b/lisp/iswitchb.el
index dfc58d4165d..b3dce824c36 100644
--- a/lisp/iswitchb.el
+++ b/lisp/iswitchb.el
@@ -368,6 +368,11 @@ See also `iswitchb-newbuffer'."
   :type 'hook
   :group 'iswitchb)
 
+(defcustom iswitchb-delim ","
+  "Delimiter to put between buffer names when displaying results."
+  :type 'string
+  :group 'iswitchb)
+
 (defvar iswitchb-all-frames 'visible
   "*Argument to pass to `walk-windows' when finding visible buffers.
 See documentation of `walk-windows' for useful values.")
@@ -1340,7 +1345,7 @@ Modified from `icomplete-completions'."
 		  most-is-exact
 		  (alternatives
 		   (mapconcat (if most 'iswitchb-output-completion
-				'identity) comps ",")))
+				'identity) comps iswitchb-delim)))
 
 	     (concat
 
@@ -1363,7 +1368,7 @@ Modified from `icomplete-completions'."
 	      ;; list all alternatives
 	      open-bracket-prospects
 	      (if most-is-exact
-		  (concat "," alternatives)
+		  (concat iswitchb-delim alternatives)
 		alternatives)
 	      close-bracket-prospects))))))