diff options
| author | Chong Yidong <cyd@stupidchicken.com> | 2006-09-23 18:39:22 +0000 |
|---|---|---|
| committer | Chong Yidong <cyd@stupidchicken.com> | 2006-09-23 18:39:22 +0000 |
| commit | 397e713bc5360c1b807bd8874b2f356572cba8eb (patch) | |
| tree | 0281f1382d2ccb919811e4816e7fe295d4d92c43 /lisp/icomplete.el | |
| parent | bf6a82f12e9ec88799bc4625f4bc1fc58f0e26c7 (diff) | |
| download | emacs-397e713bc5360c1b807bd8874b2f356572cba8eb.tar.gz | |
2006-09-23 Ken Manheimer <ken.manheimer@gmail.com>
* icomplete.el (icomplete-with-completion-tables): List of
specialized completion tables with which icomplete should
operate. Include the new `internal-complete-buffer', so icomplete
works with interactive buffer-selection.
(icomplete-simple-completing-p): Add acceptance of specialized
completion tables listed in icomplete-with-completion-tables.
Diffstat (limited to 'lisp/icomplete.el')
| -rw-r--r-- | lisp/icomplete.el | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/lisp/icomplete.el b/lisp/icomplete.el index f53ef7c91d1..5d1d6eb37a9 100644 --- a/lisp/icomplete.el +++ b/lisp/icomplete.el @@ -157,6 +157,12 @@ is minibuffer." (< (length x) (length y)))) ", ") ">")))))) +;;;_ = icomplete-with-completion-tables +(defvar icomplete-with-completion-tables '(internal-complete-buffer) + "Specialized completion tables with which icomplete should operate. + +Icomplete does not operate with any specialized completion tables +except those on this list.") ;;;_ > icomplete-mode (&optional prefix) ;;;###autoload @@ -184,8 +190,9 @@ Conditions are: (and (window-minibuffer-p (selected-window)) (not executing-kbd-macro) minibuffer-completion-table - ;; (or minibuffer-completing-file-name - (not (functionp minibuffer-completion-table)))) ;; ) + (or (not (functionp minibuffer-completion-table)) + (member minibuffer-completion-table + icomplete-for-completion-tables)))) ;;;_ > icomplete-minibuffer-setup () (defun icomplete-minibuffer-setup () @@ -326,6 +333,7 @@ are exhibited within the square braces.)" ;;;_* Local emacs vars. ;;;Local variables: ;;;allout-layout: (-2 :) +;;;allout-widgets-mode-inhibit: t ;;;End: ;; arch-tag: 339ec25a-0741-4eb6-be63-997532e89b0f |