diff options
| author | Stephen Eglen | 2008-07-22 08:47:00 +0000 |
|---|---|---|
| committer | Stephen Eglen | 2008-07-22 08:47:00 +0000 |
| commit | 6a0e4c608b39e90e2997808b1cca7909edbe5b3f (patch) | |
| tree | fc7323a4350d05c43a4ae9082333cac767c6a603 | |
| parent | 276db9eb1f0c757815434a1a699740ded3518abc (diff) | |
| download | emacs-6a0e4c608b39e90e2997808b1cca7909edbe5b3f.tar.gz emacs-6a0e4c608b39e90e2997808b1cca7909edbe5b3f.zip | |
(iswitchb-delim): New variable, suggested by Ted Roden.
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/iswitchb.el | 9 |
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 @@ | |||
| 1 | 2008-07-22 Stephen Eglen <stephen@gnu.org> | ||
| 2 | |||
| 3 | * iswitchb.el (iswitchb-delim): New variable, suggested by Ted | ||
| 4 | Roden. | ||
| 5 | |||
| 1 | 2008-07-22 Sven Joachim <svenjoac@gmx.de> (tiny change) | 6 | 2008-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. |
| 373 | See documentation of `walk-windows' for useful values.") | 378 | See 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 | ||