/[emacs]/emacs/lisp/iswitchb.el
ViewVC logotype

Diff of /emacs/lisp/iswitchb.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.33 by rms, Fri Nov 16 21:10:37 2001 UTC revision 1.34 by rms, Mon Nov 19 14:08:49 2001 UTC
# Line 271  example functions that filter buffername Line 271  example functions that filter buffername
271    :type '(repeat regexp)    :type '(repeat regexp)
272    :group 'iswitchb)    :group 'iswitchb)
273    
274    (defcustom iswitchb-cannot-complete-hook 'iswitchb-completion-help
275      "*Hook run when `iswitchb-complete' can't complete any more.
276    The most useful values are `iswitchb-completion-help', which pops up a
277    window with completion alternatives, or `iswitchb-next-match' or
278    `iswitchb-prev-match', which cycle the buffer list."
279      :type 'hook
280      :group 'iswitchb)
281    
282  ;;; Examples for setting the value of iswitchb-buffer-ignore  ;;; Examples for setting the value of iswitchb-buffer-ignore
283  ;(defun iswitchb-ignore-c-mode (name)  ;(defun iswitchb-ignore-c-mode (name)
284  ;  "Ignore all c mode buffers -- example function for iswitchb."  ;  "Ignore all c mode buffers -- example function for iswitchb."
# Line 632  The result is stored in `iswitchb-common Line 640  The result is stored in `iswitchb-common
640    (interactive)    (interactive)
641    (let (res)    (let (res)
642      (cond ((not  iswitchb-matches)      (cond ((not  iswitchb-matches)
643             (iswitchb-completion-help))             (run-hooks 'iswitchb-cannot-complete-hook))
644                        
645            ((= 1 (length iswitchb-matches))            ((= 1 (length iswitchb-matches))
646             ;; only one choice, so select it.             ;; only one choice, so select it.
# Line 649  The result is stored in `iswitchb-common Line 657  The result is stored in `iswitchb-common
657                   (delete-region (minibuffer-prompt-end) (point))                   (delete-region (minibuffer-prompt-end) (point))
658                   (insert  res))                   (insert  res))
659               ;; else nothing to complete               ;; else nothing to complete
660               (iswitchb-completion-help)               (run-hooks 'iswitchb-cannot-complete-hook)
661               )))))               )))))
662    
663  ;;; TOGGLE FUNCTIONS  ;;; TOGGLE FUNCTIONS

Legend:
Removed from v.1.33  
changed lines
  Added in v.1.34

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26