diff --git a/hydra/goggles.scm b/hydra/goggles.scm
index 02b76e4..b235138 100755
--- a/hydra/goggles.scm
+++ b/hydra/goggles.scm
@@ -358,9 +358,15 @@ freenode." channel))
                  (cons (request-method request)
                        (request-path-components request)))))
 
-(define (main . args)
-  (let ((port (assoc-ref %config 'port)))
-    (run-server handler
-                'http
-                `(#:addr ,INADDR_ANY
-                  #:port ,port))))
+(define (main args)
+  (match args
+    ((_ "index")
+     (for-each index-channel-logs
+               (assoc-ref %config 'channels))
+     #t)
+    (_
+     (let ((port (assoc-ref %config 'port)))
+       (run-server handler
+                   'http
+                   `(#:addr ,INADDR_ANY
+                     #:port ,port))))))