diff --git a/crawl.R b/crawl.R
index 4ac16f5..6af2afa 100644
--- a/crawl.R
+++ b/crawl.R
@@ -59,14 +59,14 @@ out_json <- render_json(out, date=as.Date(now))
 write(out_json, paste0("./output/", field, ".json"))
 
 # Update past urls
-write.table(out[,"url"], 
-    file=paste0("./memory/", field, "_urls.csv"), 
-    na="", 
-    sep=";", 
-    append=TRUE, 
-    quote=FALSE, 
-    col.names=FALSE,
-    row.names=FALSE)
+#   write.table(out[,"url"], 
+#       file=paste0("./memory/", field, "_urls.csv"), 
+#       na="", 
+#       sep=";", 
+#       append=TRUE, 
+#       quote=FALSE, 
+#       col.names=FALSE,
+#       row.names=FALSE)
 
 # Write journal short list
 journals_out <- unique(journals[,c("journal_full","journal_short")])