fixes.

3 files changed, 4 insertions, 4 deletions

diff --git a/module/calp/entry-points/server.scm b/module/calp/entry-points/server.scm
index 97397e5d..443892f3 100644
--- a/module/calp/entry-points/server.scm
+++ b/module/calp/entry-points/server.scm
@@ -8,7 +8,7 @@
   :use-module (ice-9 getopt-long)
   ;; :use-module (ice-9 regex) #| regex here due to bad macros |#
 
-  :use-module ((server server) :select (start-server))
+  :use-module ((calp server server) :select (start-server))
 
   :export (main))
 
diff --git a/module/calp/server/routes.scm b/module/calp/server/routes.scm
index afca2d7d..697f2e50 100644
--- a/module/calp/server/routes.scm
+++ b/module/calp/server/routes.scm
@@ -1,4 +1,4 @@
-(define-module (server routes)
+(define-module (calp server routes)
   :use-module (util)
   :use-module (util options)
   :use-module (util exceptions)
diff --git a/module/calp/server/server.scm b/module/calp/server/server.scm
index 9c857b6d..1ad700f1 100644
--- a/module/calp/server/server.scm
+++ b/module/calp/server/server.scm
@@ -1,7 +1,7 @@
-(define-module (server server)
+(define-module (calp server server)
   :use-module (util)
   :use-module (web server)
-  :use-module ((server routes) :select (make-make-routes))
+  :use-module ((calp server routes) :select (make-make-routes))
   :use-module (ice-9 threads))
 
 ;; NOTE The default make-default-socket is broken for IPv6.