From: Eshel Yaron <me@eshelyaron.com>
Date: Wed, 3 Jan 2024 14:42:24 +0000 (+0100)
Subject: ; (cherry-pick-new-commits): Make *cherry* buffer read-only.
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4943665b38015b853460efc7407c6f4ec7599f8b;p=emacs.git

; (cherry-pick-new-commits): Make *cherry* buffer read-only.
---

diff --git a/admin/cherry.el b/admin/cherry.el
index d0ee48d7237..6e567b67205 100644
--- a/admin/cherry.el
+++ b/admin/cherry.el
@@ -88,11 +88,13 @@
             (current 0))
         (dolist (commit new-commits)
           (with-current-buffer (get-buffer-create "*cherry*")
+            (setq buffer-read-only nil)
             (delete-region (point-min) (point-max))
             (fundamental-mode))
           (call-process "git" nil "*cherry*" t "-C" source-directory
                         "format-patch" "-1" commit "--stdout")
           (pop-to-buffer "*cherry*")
+          (setq buffer-read-only t)
           (diff-mode)
           (goto-char (point-min))
           (let ((choice (read-multiple-choice