From e863fdb203c01b33a90fbadec2ac07d22c4cdd86 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 1 Jun 1993 00:54:52 +0000 Subject: (count-windows): PROC argument of walk-windows takes an argument. --- lisp/window.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisp/window.el') diff --git a/lisp/window.el b/lisp/window.el index 621e0706efa..a69c20018d7 100644 --- a/lisp/window.el +++ b/lisp/window.el @@ -1,4 +1,4 @@ -;;; windows.el --- GNU Emacs window commands aside from those written in C. +;;; window.el --- GNU Emacs window commands aside from those written in C. ;;; Copyright (C) 1985, 1989, 1992 Free Software Foundation, Inc. @@ -27,7 +27,7 @@ Optional arg NO-MINI non-nil means don't count the minibuffer even if it is active." (let ((count 0)) - (walk-windows (function (lambda () + (walk-windows (function (lambda (w) (setq count (+ count 1)))) minibuf) count)) -- cgit v1.2.1