Guile Freenet
 
(drak)
2016-02-10: fix initial line + document more

fix initial line + document more

diff --git a/parse-crawled.scm b/parse-crawled.scm
--- a/parse-crawled.scm
+++ b/parse-crawled.scm
@@ -66,12 +66,21 @@
   "Format the list of trust lists as csv file.
 
 See https://gephi.org/users/supported-graph-formats/csv-format/
+
+steps:
+- trusting ids: map car trusts
+- additional ids: every ID not in trusting ids.
+
+;A;B
+A;0;1
+B;0;0
+
 "
   (let ((port (if target-filename
                   (open-output-file target-filename)
                   (current-output-port)))
         (ids (map car trusts)))
-    (display (string-join ids ";") port)
+    (display (string-append ";" (string-join ids ";")) port)
     (newline port)
     ; (write (car trusts))
     ; (newline)