Subject: Re: Lisp, 50th Birthday
From: rpw3@rpw3.org (Rob Warnock)
Date: Mon, 02 Jun 2008 21:02:56 -0500
Newsgroups: comp.lang.lisp
Message-ID: <c_idnRPf8_3NO9nVnZ2dnUVZ_gidnZ2d@speakeasy.net>
Ken Tilton  <kentilton@gmail.com> wrote:
+---------------
| http://common-lisp.net/cgi-bin/viewcvs.cgi/cells/cells-manifesto.txt?rev=1.13&root=cells&view=markup
+---------------

Call me stupid, but isn't there a bug in the first example?

  (make-instance 'menu-item
		 :label "Cut"
		 :enabled (c? (bwhen (f (focus *window*))
				(and (typep focus 'text-widget)
				     (selection-range focus)))))

Shouldn't those last two occurences of FOCUS be F instead?

  (make-instance 'menu-item
		 :label "Cut"
		 :enabled (c? (bwhen (f (focus *window*))
				(and (typep f 'text-widget)
				     (selection-range f)))))

Or am I misunderstanding BWHEN? [I thought
it was sort of a BIND + WHEN or LET1 + WHEN.]


-Rob

-----
Rob Warnock			<rpw3@rpw3.org>
627 26th Avenue			<URL:http://rpw3.org/>
San Mateo, CA 94403		(650)572-2607