From d95ca0d94dfe69329aeb30fa94aed003b0ce5ac9 Mon Sep 17 00:00:00 2001 From: Simon Josefsson Date: Thu, 15 Nov 2001 18:33:30 +0000 Subject: [PATCH] 2001-11-15 Simon Josefsson * nnml.el (nnml-save-marks): * nnfolder.el (nnfolder-save-marks): Use `gnus-prin1'. Suggested by Istvan Marko . --- lisp/ChangeLog | 6 ++++++ lisp/nnfolder.el | 2 +- lisp/nnml.el | 2 +- 3 files changed, 8 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 129103cd7..86194f91b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2001-11-15 Simon Josefsson + + * nnml.el (nnml-save-marks): + * nnfolder.el (nnfolder-save-marks): Use `gnus-prin1'. + Suggested by Istvan Marko . + 2001-11-15 Per Abrahamsen * gnus-art.el (gnus-article-wash-status-strings): Use diff --git a/lisp/nnfolder.el b/lisp/nnfolder.el index 1de4e5223..149b87ba3 100644 --- a/lisp/nnfolder.el +++ b/lisp/nnfolder.el @@ -1215,7 +1215,7 @@ This command does not work if you use short group names." (progn (with-temp-file file (erase-buffer) - (princ nnfolder-marks (current-buffer)) + (gnus-prin1 nnfolder-marks (current-buffer)) (insert "\n")) (gnus-sethash file (nth 5 (file-attributes file)) diff --git a/lisp/nnml.el b/lisp/nnml.el index a07a87f6b..517bd1fe8 100644 --- a/lisp/nnml.el +++ b/lisp/nnml.el @@ -991,7 +991,7 @@ Use the nov database for the current group if available." (nnml-possibly-create-directory group) (with-temp-file file (erase-buffer) - (princ nnml-marks (current-buffer)) + (gnus-prin1 nnml-marks (current-buffer)) (insert "\n")) (gnus-sethash file (nth 5 (file-attributes file)) -- 2.25.1