aboutsummaryrefslogtreecommitdiff
path: root/bot/sx-bot.el
diff options
context:
space:
mode:
Diffstat (limited to 'bot/sx-bot.el')
-rw-r--r--bot/sx-bot.el13
1 files changed, 5 insertions, 8 deletions
diff --git a/bot/sx-bot.el b/bot/sx-bot.el
index fe93beb..b32a69c 100644
--- a/bot/sx-bot.el
+++ b/bot/sx-bot.el
@@ -27,14 +27,13 @@
;;; Code:
-(require 'sx-site)
-(require 'sx-tag)
-
-(setq sx-request-remaining-api-requests-message-threshold 50000)
-
(require 'package)
(package-initialize)
+(require 'sx-load)
+
+(setq sx-request-remaining-api-requests-message-threshold 50000)
+
(defcustom sx-bot-out-dir "./data/tags/"
"Directory where output tag files are saved."
:type 'directory
@@ -51,15 +50,13 @@ File is savedd in `sx-bot-out-dir'."
(repr (prin1-to-string
(sort (cdr data)
#'string-lessp))))
- (insert repr)
- (insert "\n")
+ (insert repr "\n")
(goto-char (point-min))
(while (search-forward "\" \"" nil t)
(replace-match "\"\n \"" nil t))))
(message "Wrote %S" file-name)
file-name))
-
(defun sx-bot-fetch-and-write-tags ()
"Get a list of all tags of all sites and save to disk."
(make-directory sx-bot-out-dir t)