scripts: Use index!.

1 files changed, 11 insertions, 6 deletions

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