@@ -20,14 +20,19 @@
 
 ;;======================================================================
 ;; Database access
 ;;======================================================================
 
-(require-extension (srfi 18) extras tcp)
-(use sqlite3 srfi-1 posix regex regex-case srfi-69 csv-xml s11n md5 message-digest base64)
-(import (prefix sqlite3 sqlite3:))
-(import (prefix base64 base64:))
+(import
+ (srfi 18)
+ ;; extras tcp)
+
+ sqlite3 srfi-1
+ ;; posix regex regex-case srfi-69 csv-xml s11n md5 message-digest base64
+
+ (prefix sqlite3 sqlite3:)
+ (prefix base64 base64:))
 
 (declare (unit tdb))
 (declare (uses common))
 (declare (uses keys))
 (declare (uses ods))