Fix eww bookmark writing

* lisp/net/eww.el (eww-write-bookmarks): Ensure that the complete
bookmarks are written (bug#54612).
This commit is contained in:
Thomas Fitzsimmons 2022-03-29 14:34:38 +02:00 committed by Lars Ingebrigtsen
parent 0e662f33e1
commit 271c03d89f

View file

@ -2053,7 +2053,9 @@ If CHARSET is nil then use UTF-8."
(defun eww-write-bookmarks ()
(with-temp-file (expand-file-name "eww-bookmarks" eww-bookmarks-directory)
(insert ";; Auto-generated file; don't edit -*- mode: lisp-data -*-\n")
(pp eww-bookmarks (current-buffer))))
(let ((print-length nil)
(print-level nil))
(pp eww-bookmarks (current-buffer)))))
(defun eww-read-bookmarks (&optional error-out)
"Read bookmarks from `eww-bookmarks'.