Implement wiki-fetch-prefer-local

1 files changed, 2 insertions, 2 deletions

diff --git a/wiki-utils.el b/wiki-utils.el
index 5b66075..c2500a4 100644
--- a/wiki-utils.el
+++ b/wiki-utils.el
@@ -34,14 +34,14 @@
   "If non-nil, visit the local file if exists when instructed for
 fetching.")
 
-(defun wiki-fetch-url (url &optional callback title)
+(defun wiki-fetch-url (url dir &optional callback title)
   "Fetch URL asynchronously.
 
 Then calls CALLBACK which is a closure taking no argument."
   (interactive "sURL: ")
   (let ((file-name (expand-file-name
                     (or title (wiki-make-file-name-from-url url))
-                    wiki-download-dir))
+                    dir))
         (cb (lambda (status file-name)
               (wiki-fetch-url-save-and-switch status file-name)
               (when callback (funcall callback)))))