From b0c2986d135d42e13ec6b50acbad4fff234bb33c Mon Sep 17 00:00:00 2001 From: rubikitch Date: Thu, 29 Sep 2011 14:36:42 +0900 Subject: [PATCH] anything-config.el (anything-show-this-source-only): revived --- anything-config.el | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/anything-config.el b/anything-config.el index f4b80f9..ae76e6b 100644 --- a/anything-config.el +++ b/anything-config.el @@ -2660,6 +2660,13 @@ Default is `anything-current-buffer'." (anything-match-line-color-current-line) (sit-for 0.3) (anything-match-line-cleanup)) +(defun anything-show-this-source-only () + "Only show this source." + (interactive) + (setq anything-candidate-number-limit 9999) + (anything-set-source-filter + (list (assoc-default 'name (anything-get-current-source))))) + ;;;###autoload (defun anything-test-sources () "List all anything sources for test. -- 2.11.4.GIT