|
|
@@ -553,11 +553,14 @@ Including ancestors and descendants, if any."
|
|
|
(hierarchy-map 'exitter-format-post posts-hier 1)
|
|
|
"\n")))
|
|
|
|
|
|
+(defvar exitter-dir (locate-user-emacs-file "exitter")
|
|
|
+ "Path to local directory of saved threads.")
|
|
|
+
|
|
|
(defun exitter-save-posts (filtered-details id)
|
|
|
;; (pp filtered-details)
|
|
|
(exitter-save-text-and-switch-to-buffer
|
|
|
(exitter-format-posts filtered-details)
|
|
|
- (format "~/Downloads/%s.org" id)))
|
|
|
+ (format (file-name-concat exitter-dir (format "%s.org" id)))))
|
|
|
|
|
|
(defun exitter-post-url (user post-id)
|
|
|
(format "https://x.com/%s/status/%s" user post-id))
|