# HG changeset patch # User Richard M. Stallman # Date 738896092 0 # Node ID 13ddc81f0b43570af183f7fcbbe11664d150e8a4 # Parent 8e39495c5be422adf11cbcb63cf233f5a64196d3 (count-windows): PROC argument of walk-windows takes an argument. diff -r 8e39495c5be4 -r 13ddc81f0b43 lisp/window.el --- a/lisp/window.el Tue Jun 01 00:50:50 1993 +0000 +++ b/lisp/window.el Tue Jun 01 00:54:52 1993 +0000 @@ -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))