Fix insertion of edited servers in the dribble file

* lisp/gnus/gnus-srvr.el (gnus-server-update-server): Don't
insert explicit newlines, because they're quoted (bug#22903).

Backport:

(cherry picked from commit ca4e30058e)
This commit is contained in:
Lars Ingebrigtsen 2016-03-04 11:52:26 +00:00
parent 620951fe22
commit 6db1a873d5

View file

@ -389,7 +389,7 @@ The following commands are available:
(when entry (when entry
(gnus-dribble-enter (gnus-dribble-enter
(concat "(gnus-server-set-info \"" server "\" '" (concat "(gnus-server-set-info \"" server "\" '"
(gnus-prin1-to-string (cdr entry)) ")\n") (gnus-prin1-to-string (cdr entry)) ")")
(concat "^(gnus-server-set-info \"" (regexp-quote server) "\""))) (concat "^(gnus-server-set-info \"" (regexp-quote server) "\"")))
(when (or entry oentry) (when (or entry oentry)
;; Buffer may be narrowed. ;; Buffer may be narrowed.