From c940380872fe2544fa8d28527d6e3ce7c8222249 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 19 Nov 2001 14:08:59 +0000 Subject: [PATCH] (iswitchb-cannot-complete-hook): New variable to control behaviour when no further completion is possible. --- lisp/ChangeLog | 5 +++++ lisp/iswitchb.el | 12 ++++++++++-- 2 files changed, 15 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index b5b244a4e61..32a3c1eec6a 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2001-11-18 Stephen Eglen + + * iswitchb.el (iswitchb-cannot-complete-hook): New variable to + control behaviour when no further completion is possible. + 2001-11-19 Colin Walters * calc/calc-macs.el (calc-wrapper, calc-slow-wrapper) diff --git a/lisp/iswitchb.el b/lisp/iswitchb.el index 9e1b80e8f2e..74aa2085082 100644 --- a/lisp/iswitchb.el +++ b/lisp/iswitchb.el @@ -271,6 +271,14 @@ example functions that filter buffernames." :type '(repeat regexp) :group 'iswitchb) +(defcustom iswitchb-cannot-complete-hook 'iswitchb-completion-help + "*Hook run when `iswitchb-complete' can't complete any more. +The most useful values are `iswitchb-completion-help', which pops up a +window with completion alternatives, or `iswitchb-next-match' or +`iswitchb-prev-match', which cycle the buffer list." + :type 'hook + :group 'iswitchb) + ;;; Examples for setting the value of iswitchb-buffer-ignore ;(defun iswitchb-ignore-c-mode (name) ; "Ignore all c mode buffers -- example function for iswitchb." @@ -632,7 +640,7 @@ The result is stored in `iswitchb-common-match-string'." (interactive) (let (res) (cond ((not iswitchb-matches) - (iswitchb-completion-help)) + (run-hooks 'iswitchb-cannot-complete-hook)) ((= 1 (length iswitchb-matches)) ;; only one choice, so select it. @@ -649,7 +657,7 @@ The result is stored in `iswitchb-common-match-string'." (delete-region (minibuffer-prompt-end) (point)) (insert res)) ;; else nothing to complete - (iswitchb-completion-help) + (run-hooks 'iswitchb-cannot-complete-hook) ))))) ;;; TOGGLE FUNCTIONS -- 2.39.5