@@ -33,11 +33,18 @@
 (declare (uses processmod))
 
 (use srfi-69)
 
 (module fsmod
-	*
+	(
+	 get-df
+	 get-uname
+	 common:get-disk-with-most-free-space
+	 common:get-disk-space-used
+	 common:check-db-dir-and-exit-if-insufficient
+
+	 )
 
 (import scheme)
 (cond-expand
  (chicken-4