[elpa] externals/beframe 6f9c6322a2: Fix bug with frame-specific scratch deletion

[ELPA Syncer]

branch: externals/beframe
commit 6f9c6322a285bc75191853ac0c7e2fefff0ac354
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Fix bug with frame-specific scratch deletion
    
    We only want to delete the scratch buffer that belongs to the given
    frame when that frame is deleted.
---
 beframe.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/beframe.el b/beframe.el
index 86d6e5350d..d8ff8d21fe 100644
--- a/beframe.el
+++ b/beframe.el
@@ -6,7 +6,7 @@
 ;; Maintainer: Protesilaos Stavrou General Issues 
<~protesilaos/general-issues@lists.sr.ht>
 ;; URL: https://git.sr.ht/~protesilaos/beframe
 ;; Mailing-List: https://lists.sr.ht/~protesilaos/general-issues
-;; Version: 0.1.7
+;; Version: 0.1.8
 ;; Package-Requires: ((emacs "28.1"))
 
 ;; This file is NOT part of GNU Emacs.
@@ -398,8 +398,9 @@ its placement and other parameters."
       (when (zerop (buffer-size))
         (insert initial-scratch-message))
       (add-hook 'delete-frame-functions
-                (lambda (_frame)
-                  (when beframe-kill-frame-scratch-buffer
+                (lambda (frame)
+                  (when (and beframe-kill-frame-scratch-buffer
+                             (null frame))
                     (kill-buffer buf)))))
     (let* ((frame-bufs (beframe--buffer-list frame))
            (frame-bufs-with-buf (push buf frame-bufs)))