master aa67e10fe9: Prevent the initial frame from showing up in the frame menu

[Po Lu]

branch: master
commit aa67e10fe97fad65430780439df337ae8a463dac
Author: Po Lu <luangruo@yahoo.com>
Commit: Po Lu <luangruo@yahoo.com>

    Prevent the initial frame from showing up in the frame menu
    
    * lisp/menu-bar.el (menu-bar-update-buffers): Ignore initial
    frame when generating frame list.  (bug#53740)
---
 lisp/menu-bar.el | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index bde34ac910..891cdfd5d5 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -2342,9 +2342,12 @@ It must accept a buffer as its only required argument.")
   (and (lookup-key (current-global-map) [menu-bar buffer])
        (or force (frame-or-buffer-changed-p))
        (let ((buffers (buffer-list))
-            (frames (frame-list))
-            buffers-menu)
-
+            frames buffers-menu)
+         ;; Ignore the initial frame if present.  It can happen if
+         ;; Emacs was started as a daemon.  (bug#53740)
+         (dolist (frame (frame-list))
+           (unless (eq frame frame-initial-frame)
+             (push frame frames)))
         ;; Make the menu of buffers proper.
         (setq buffers-menu
                (let ((i 0)