[emacs][firefox] Archive webpages

firefox: add SingleFile settings
emacs: use separate dir for downloading webpages

2 files changed, 3 insertions, 2 deletions

diff --git a/emacs/.emacs.d/lisp/my/my-net.el b/emacs/.emacs.d/lisp/my/my-net.el
index 6212b50..b19ce68 100644
--- a/emacs/.emacs.d/lisp/my/my-net.el
+++ b/emacs/.emacs.d/lisp/my/my-net.el
@@ -29,6 +29,7 @@
 
 ;;; net utilities
 (defvar my-download-dir "~/Downloads")
+(defvar my-webpage-download-dir "~/Downloads")
 
 (defmacro my-url-as-googlebot (&rest body)
   "Run BODY while spoofing as googlebot"
diff --git a/emacs/.emacs.d/lisp/my/my-web.el b/emacs/.emacs.d/lisp/my/my-web.el
index d1eacb6..7c9c567 100644
--- a/emacs/.emacs.d/lisp/my/my-web.el
+++ b/emacs/.emacs.d/lisp/my/my-web.el
@@ -146,10 +146,10 @@ Useful for bypassing \"Enable JavaScript and cookies to continue\"."
          (if no-overwrite
              (my-make-unique-file-name
               (my-make-file-name-from-url url)
-              my-download-dir)
+              my-webpage-download-dir)
            (expand-file-name
             (my-make-file-name-from-url url "html")
-            my-download-dir))))
+            my-webpage-download-dir))))
     (url-copy-file url file-name (not no-overwrite))
     (browse-url-firefox (format "file://%s" file-name))))