Guile Freenet
 
(drak)
2016-02-10: parse the first 3 files

parse the first 3 files

diff --git a/parse-crawled.scm b/parse-crawled.scm
--- a/parse-crawled.scm
+++ b/parse-crawled.scm
@@ -95,4 +95,4 @@
            (files (cdr (scandir dir select?))))
       (trust-lists->csv
        (par-map parse-trust-values
-                (list (car files) (car (cdr files))))))))
+                (list (car files) (car (cdr files)) (car (cdr (cdr files)))))))))