From e90894ef964a5cd84eb6fd7da6969e3ffa2945e1 Mon Sep 17 00:00:00 2001
From: Ricardo Wurmus <rekado@elephly.net>
Date: Wed, 22 Apr 2020 11:00:21 +0200
Subject: scripts: Use index!.

---
 scripts/mumi.in | 17 +++++++++++------
 1 file changed, 11 insertions(+), 6 deletions(-)

(limited to 'scripts/mumi.in')

diff --git a/scripts/mumi.in b/scripts/mumi.in
index 3297b79..b4c843c 100644
--- a/scripts/mumi.in
+++ b/scripts/mumi.in
@@ -22,17 +22,21 @@
 ;;; along with mumi.  If not, see <http://www.gnu.org/licenses/>.
 
 (use-modules (srfi srfi-1)
-             (srfi srfi-26)
              (srfi srfi-37)
              (system repl server)
              (ice-9 match)
              (ice-9 format)
              (mumi config)
-             (mumi bugs)
-             (mumi jobs)
-             (mumi messages)
-             (mumi web server)
-             (debbugs))
+             ((mumi bugs)
+              #:select (db-create! update-bug-database!))
+             ((mumi jobs)
+              #:select (worker-loop))
+             ((mumi web server)
+              #:select (start-mumi-web-server))
+             ((mumi xapian)
+              #:select (index!))
+             ((debbugs)
+              #:select (soap-invoke* get-bugs)))
 
 (db-create!)
 
@@ -47,6 +51,7 @@
 (define* (update-state! #:key loop?)
   (catch #t
     (lambda ()
+      (index!)
       (let ((nums (sort (append-map (lambda (package)
                                       (soap-invoke* (%config 'debbugs)
                                                     get-bugs
-- 
cgit v1.2.3