[elpa] externals/hyperbole c8289451ae 3/7: Remove trace of deleted new-buf-flag

[ELPA Syncer]

branch: externals/hyperbole
commit c8289451ae594a4b4f072ebd0134f099aca68fbf
Author: Mats Lidell <mats.lidell@lidells.se>
Commit: Mats Lidell <mats.lidell@lidells.se>

    Remove trace of deleted new-buf-flag
---
 hyrolo.el | 15 +++------------
 1 file changed, 3 insertions(+), 12 deletions(-)

diff --git a/hyrolo.el b/hyrolo.el
index aeb9a79d5e..1a84c1bd5d 100644
--- a/hyrolo.el
+++ b/hyrolo.el
@@ -3,7 +3,7 @@
 ;; Author:       Bob Weiner
 ;;
 ;; Orig-Date:     7-Jun-89 at 22:08:29
-;; Last-Mod:     12-Nov-24 at 20:21:19 by Mats Lidell
+;; Last-Mod:     13-Nov-24 at 13:17:36 by Mats Lidell
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -1973,8 +1973,7 @@ Return number of matching entries found."
   ;; Save pattern as last rolo search expression.
   (setq hyrolo-match-regexp pattern)
   ;;
-  (let (;;(new-buf-flag)
-        (actual-buf)
+  (let ((actual-buf)
        ;; Temporarily disable magit-auto-revert-mode-enable-in-buffers for 
hyrolo
        ;; buffers; not needed and can slow/hang file loading
        (after-change-major-mode-hook
@@ -1982,9 +1981,7 @@ Return number of matching entries found."
     (if (and (or (null max-matches) (eq max-matches t) (integerp max-matches))
             (or (setq actual-buf (hyrolo-buffer-exists-p hyrolo-file-or-buf))
                 (when (file-exists-p hyrolo-file-or-buf)
-                  (setq actual-buf (hyrolo-find-file-noselect 
hyrolo-file-or-buf)
-                        ;; new-buf-flag t
-                         ))))
+                  (setq actual-buf (hyrolo-find-file-noselect 
hyrolo-file-or-buf)))))
        (let ((num-found 0)
              (incl-hdr t)
              (stuck-negative-point 0)
@@ -1999,12 +1996,6 @@ Return number of matching entries found."
                         max-matches (- max-matches)))))
          (set-buffer actual-buf)
 
-         ;; Comment out next two lines that could set source buffer
-         ;; to read-only since this can break org-capture into the
-         ;; buffer.  -- rsw, 2024-11-03
-         ;; (when new-buf-flag
-         ;;  (setq buffer-read-only t))
-
          (when (and headline-only
                     (not (string-match (concat "\\`\\(" (regexp-quote "^") 
"\\|" (regexp-quote "\\`") "\\)") pattern)))
            ;; If matching only to headlines and pattern is not already