From 27aa8132cdecb9555b2c3a14f1b0eb1011e542f9 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 21 Jun 1996 05:54:19 +0000 Subject: [PATCH] Whitespace change. --- lisp/menu-bar.el | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index 29047d18a1c..e72aab64f01 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el @@ -380,12 +380,12 @@ Do the same for the keys of the same name." (defun delete-frame-enabled-p () "Return non-nil if `delete-frame' should be enabled in the menu bar." (let ((frames (frame-list)) - (count 0)) - (while frames - (if (frame-visible-p (car frames)) - (setq count (1+ count))) - (setq frames (cdr frames))) - (> count 1))) + (count 0)) + (while frames + (if (frame-visible-p (car frames)) + (setq count (1+ count))) + (setq frames (cdr frames))) + (> count 1))) (put 'advertised-undo 'menu-enable '(and (not (eq t buffer-undo-list)) -- 2.39.5