(drak)
2016-03-30: add commented-out example for crawling one seed notabug/master tip masteradd commented-out example for crawling one seed
diff --git a/crawl-wot.scm b/crawl-wot.scm
--- a/crawl-wot.scm
+++ b/crawl-wot.scm
@@ -222,6 +222,7 @@
(let ((seed (if (string-index seed-id #\/)
seed-id
(string-append "USK" (string-drop seed-id 3) "/WebOfTrust/-1")))) ; -1 can also return 0
- ;; (write (download-by-date-hint seed))
+ ;; (crawl-wot seed))))
+ ;; (write (download-by-date-hint seed)))))
(par-map download-by-date-hint
(crawl-wot seed)))))