aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStephen Eglen2008-07-22 08:47:00 +0000
committerStephen Eglen2008-07-22 08:47:00 +0000
commit6a0e4c608b39e90e2997808b1cca7909edbe5b3f (patch)
treefc7323a4350d05c43a4ae9082333cac767c6a603
parent276db9eb1f0c757815434a1a699740ded3518abc (diff)
downloademacs-6a0e4c608b39e90e2997808b1cca7909edbe5b3f.tar.gz
emacs-6a0e4c608b39e90e2997808b1cca7909edbe5b3f.zip
(iswitchb-delim): New variable, suggested by Ted Roden.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/iswitchb.el9
2 files changed, 12 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3ec840f687a..bfa524d6f06 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
12008-07-22 Stephen Eglen <stephen@gnu.org>
2
3 * iswitchb.el (iswitchb-delim): New variable, suggested by Ted
4 Roden.
5
12008-07-22 Sven Joachim <svenjoac@gmx.de> (tiny change) 62008-07-22 Sven Joachim <svenjoac@gmx.de> (tiny change)
2 7
3 * vc-dir.el (vc-dir-recompute-file-state): Fix mismatched 8 * 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'."
368 :type 'hook 368 :type 'hook
369 :group 'iswitchb) 369 :group 'iswitchb)
370 370
371(defcustom iswitchb-delim ","
372 "Delimiter to put between buffer names when displaying results."
373 :type 'string
374 :group 'iswitchb)
375
371(defvar iswitchb-all-frames 'visible 376(defvar iswitchb-all-frames 'visible
372 "*Argument to pass to `walk-windows' when finding visible buffers. 377 "*Argument to pass to `walk-windows' when finding visible buffers.
373See documentation of `walk-windows' for useful values.") 378See documentation of `walk-windows' for useful values.")
@@ -1340,7 +1345,7 @@ Modified from `icomplete-completions'."
1340 most-is-exact 1345 most-is-exact
1341 (alternatives 1346 (alternatives
1342 (mapconcat (if most 'iswitchb-output-completion 1347 (mapconcat (if most 'iswitchb-output-completion
1343 'identity) comps ","))) 1348 'identity) comps iswitchb-delim)))
1344 1349
1345 (concat 1350 (concat
1346 1351
@@ -1363,7 +1368,7 @@ Modified from `icomplete-completions'."
1363 ;; list all alternatives 1368 ;; list all alternatives
1364 open-bracket-prospects 1369 open-bracket-prospects
1365 (if most-is-exact 1370 (if most-is-exact
1366 (concat "," alternatives) 1371 (concat iswitchb-delim alternatives)
1367 alternatives) 1372 alternatives)
1368 close-bracket-prospects)))))) 1373 close-bracket-prospects))))))
1369 1374