@@ -15,17 +15,17 @@
 ;; 
 ;;     You should have received a copy of the GNU General Public License
 ;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
 ;;
 
-(require-extension (srfi 18) extras tcp s11n)
-
-(use sqlite3 srfi-1 posix srfi-69 hostinfo dot-locking z3)
-(import (prefix sqlite3 sqlite3:))
-
-(declare (unit portlogger))
-(declare (uses db))
+;; (require-extension (srfi 18) extras tcp s11n)
+;; 
+;; (use sqlite3 srfi-1 posix srfi-69 hostinfo dot-locking z3)
+;; (import (prefix sqlite3 sqlite3:))
+;; 
+;; (declare (unit portlogger))
+;; (declare (uses db))
 
 ;; lsof -i
 
 (define (portlogger:open-db fname)
   (let* ((avail    (tasks:wait-on-journal fname 5 remove: #t)) ;; wait up to about 10 seconds for the journal to go away