Merge remote-tracking branch 'upstream/patch_fix_bookmark_save_crash_when_dir_missing...
authorAlex Schroeder <alex@gnu.org>
Sun, 27 Jun 2021 19:32:28 +0000 (21:32 +0200)
committerAlex Schroeder <alex@gnu.org>
Sun, 27 Jun 2021 19:32:28 +0000 (21:32 +0200)
elpher.el

index 72bba89..5ce6992 100644 (file)
--- a/elpher.el
+++ b/elpher.el
@@ -1638,6 +1638,9 @@ bookmark list, while URL is the url of the entry."
 (defun elpher-save-bookmarks (bookmarks)
   "Record the bookmark list BOOKMARKS to the user's bookmark file.
 Beware that this completely replaces the existing contents of the file."
+  (let ((bookmark-dir (file-name-directory elpher-bookmarks-file)))
+    (unless (file-directory-p bookmark-dir)
+      (make-directory bookmark-dir)))
   (with-temp-file elpher-bookmarks-file
     (erase-buffer)
     (insert "; Elpher bookmarks file\n\n"