diff options
| -rw-r--r-- | lisp/msb.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/msb.el b/lisp/msb.el index 88c2a6408b6..ae9b7381e98 100644 --- a/lisp/msb.el +++ b/lisp/msb.el | |||
| @@ -222,7 +222,7 @@ Nil means no limit.") | |||
| 222 | "*The maximum number of items from different directories. | 222 | "*The maximum number of items from different directories. |
| 223 | 223 | ||
| 224 | When the menu is of type `file by directory', this is the maximum | 224 | When the menu is of type `file by directory', this is the maximum |
| 225 | number of buffers that are clumped togehter from different | 225 | number of buffers that are clumped together from different |
| 226 | directories. | 226 | directories. |
| 227 | 227 | ||
| 228 | Set this to 1 if you want one menu per directory instead of clumping | 228 | Set this to 1 if you want one menu per directory instead of clumping |
| @@ -278,13 +278,13 @@ Set this to nil or t if you don't want any sorting (faster).") | |||
| 278 | the groups in msb-menu-cond.") | 278 | the groups in msb-menu-cond.") |
| 279 | 279 | ||
| 280 | (defvar msb-menu-cond msb--very-many-menus | 280 | (defvar msb-menu-cond msb--very-many-menus |
| 281 | "*List of criterias for splitting the mouse buffer menu. | 281 | "*List of criteria for splitting the mouse buffer menu. |
| 282 | The elements in the list should be of this type: | 282 | The elements in the list should be of this type: |
| 283 | (CONDITION MENU-SORT-KEY MENU-TITLE ITEM-HANDLING-FN ITEM-SORT-FN). | 283 | (CONDITION MENU-SORT-KEY MENU-TITLE ITEM-HANDLING-FN ITEM-SORT-FN). |
| 284 | 284 | ||
| 285 | When making the split, the buffers are tested one by one against the | 285 | When making the split, the buffers are tested one by one against the |
| 286 | CONDITION, just like a lisp cond: When hitting a true condition, the | 286 | CONDITION, just like a lisp cond: When hitting a true condition, the |
| 287 | other criterias are *not* tested and the buffer name will appear in | 287 | other criteria are *not* tested and the buffer name will appear in |
| 288 | the menu with the menu-title corresponding to the true condition. | 288 | the menu with the menu-title corresponding to the true condition. |
| 289 | 289 | ||
| 290 | If the condition returns the symbol `multi', then the buffer will be | 290 | If the condition returns the symbol `multi', then the buffer will be |
| @@ -439,7 +439,7 @@ If the argument is left out or nil, then the current buffer is considered." | |||
| 439 | (and (> (length (buffer-name buffer)) 0) | 439 | (and (> (length (buffer-name buffer)) 0) |
| 440 | (eq ?\ (aref (buffer-name buffer) 0)))) | 440 | (eq ?\ (aref (buffer-name buffer) 0)))) |
| 441 | 441 | ||
| 442 | ;; Strip one hierarcy level from the end of PATH. | 442 | ;; Strip one hierarchy level from the end of PATH. |
| 443 | (defun msb--strip-path (path) | 443 | (defun msb--strip-path (path) |
| 444 | (save-match-data | 444 | (save-match-data |
| 445 | (if (string-match "\\(.+\\)/[^/]+$" path) | 445 | (if (string-match "\\(.+\\)/[^/]+$" path) |
| @@ -840,7 +840,7 @@ variable `msb-menu-cond'." | |||
| 840 | (setq posX (- posX (funcall msb-horizontal-shift-function)) | 840 | (setq posX (- posX (funcall msb-horizontal-shift-function)) |
| 841 | position (list (list posX posY) posWind)))) | 841 | position (list (list posX posY) posWind)))) |
| 842 | ;; This `sit-for' magically makes the menu stay up if the mouse | 842 | ;; This `sit-for' magically makes the menu stay up if the mouse |
| 843 | ;; button is released withing 0.1 second. | 843 | ;; button is released within 0.1 second. |
| 844 | (sit-for 0 100) | 844 | (sit-for 0 100) |
| 845 | ;; Popup the menu | 845 | ;; Popup the menu |
| 846 | (setq choice (x-popup-menu position msb--last-buffer-menu)) | 846 | (setq choice (x-popup-menu position msb--last-buffer-menu)) |