From 7ae89402103ed394ffdff95a7a5e622faca198d4 Mon Sep 17 00:00:00 2001
From: rubikitch <rubikitch@ruby-lang.org>
Date: Fri, 23 Jul 2010 06:34:57 +0900
Subject: [PATCH] anything-match-plugin.el
 (anything-compile-source--grep-candidates): reformat

---
 anything-match-plugin.el | 43 ++++++++++++++++++++++---------------------
 1 file changed, 22 insertions(+), 21 deletions(-)

diff --git a/anything-match-plugin.el b/anything-match-plugin.el
index 086c88f..5c74d95 100644
--- a/anything-match-plugin.el
+++ b/anything-match-plugin.el
@@ -457,27 +457,28 @@ If (direct-insert-match) is in the source, this function is used."
    filter))
 (defun anything-compile-source--grep-candidates (source)
   (anything-aif (assoc-default 'grep-candidates source)
-      (append source
-              (let ((use-fast-directory
-                     (string-match
-                      anything-grep-candidates-fast-directory-regexp
-                      (car (anything-mklist (anything-interpret-value it))))))
-                (cond ((and use-fast-directory (assq 'direct-insert-match source))
-                       (anything-log "fastest version (use-fast-directory and direct-insert-match)")
-                       `((candidates . agp-candidates-synchronous-grep--direct-insert-match)
-                         (match identity)
-                         (volatile)
-                         (requires-pattern)))
-                      (use-fast-directory
-                       (anything-log "faster version (use-fast-directory)")
-                       `((candidates . agp-candidates-synchronous-grep)
-                         (match identity)
-                         (volatile)
-                         (requires-pattern)))
-                      (t
-                       (anything-log "normal version")
-                       '((candidates . agp-candidates)
-                         (delayed))))))
+      (append
+       source
+       (let ((use-fast-directory
+              (string-match
+               anything-grep-candidates-fast-directory-regexp
+               (car (anything-mklist (anything-interpret-value it))))))
+         (cond ((and use-fast-directory (assq 'direct-insert-match source))
+                (anything-log "fastest version (use-fast-directory and direct-insert-match)")
+                `((candidates . agp-candidates-synchronous-grep--direct-insert-match)
+                  (match identity)
+                  (volatile)
+                  (requires-pattern)))
+               (use-fast-directory
+                (anything-log "faster version (use-fast-directory)")
+                `((candidates . agp-candidates-synchronous-grep)
+                  (match identity)
+                  (volatile)
+                  (requires-pattern)))
+               (t
+                (anything-log "normal version")
+                '((candidates . agp-candidates)
+                  (delayed))))))
     source))
 (add-to-list 'anything-compile-source-functions 'anything-compile-source--grep-candidates)
 
-- 
2.11.4.GIT