Subject: 30.0.93; [PATCH] Restore the old behavior of `bookmark-write-file'

From: Zhengyi Fu <[email-masked]>
Date: Thu, 23 Jan 2025 13:45:11 +0800

`pp' now defaults to fill the code to fit in `fill-column', which is
great.  However, this changed the bookmark format and made it less
human-readable and unfriendly to version control.   This small patch
restores the old behavior of `bookmark-write-file'.

>From f39460bf7de265fcbff23298f37e086106b9683e Mon Sep 17 00:00:00 2001
From: Zhengyi Fu <[email-masked]>
Date: Thu, 23 Jan 2025 13:35:16 +0800
Subject: [PATCH] Restore the old behavior of `bookmark-write-file'

---
 lisp/bookmark.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/bookmark.el b/lisp/bookmark.el
index b931a4ed2f5..cd59293e0a4 100644
--- a/lisp/bookmark.el
+++ b/lisp/bookmark.el
@@ -1678,7 +1678,8 @@ bookmark-write-file
 	;; Rather than a single call to `pp' we make one per bookmark.
 	;; Apparently `pp' has a poor algorithmic complexity, so this
 	;; scales a lot better.  bug#4485.
-	(dolist (i bookmark-alist) (pp i (current-buffer)))
+	(let ((pp-default-function #'pp-28))
+	  (dolist (i bookmark-alist) (pp i (current-buffer))))
 	(insert ")\n")
 	;; Make sure the specified encoding can safely encode the
 	;; bookmarks.  If it cannot, suggest utf-8-emacs as default.
-- 
2.43.0