Re: window-matcher avoid . nil

[Christopher Roy Bratusek <zanghar freenet de>]

Am Sun, 31 Oct 2010 07:51:45 +0100
schrieb Christopher Roy Bratusek <zanghar freenet de>:

> Am Sat, 30 Oct 2010 17:08:22 -0500
> schrieb Jeremy Hankins <nowan nowan org>:
> 
> > Christopher Roy Bratusek <zanghar freenet de> writes:
> > > Hi all,
> > >
> > > I've been playing around with window-matcher avoid . nil and this is what I
> > > have:
> > 
> > Well, I played a bit with this.  These work as you'd expect, without
> > applying your patch:
> > 
> > (add-window-matcher 'WM_CLASS "^Pager/pager$"
> >                     `(avoid . ,nil))
> > 
> > (add-window-matcher 'WM_CLASS "^Pager/pager$"
> >                     '(avoid . ()))
> > 
> > But this doesn't:
> > 
> > (add-window-matcher 'WM_CLASS "^Pager/pager$"
> >                     '(avoid . nil))
> > 
> > The problem is that with that last matcher the avoid property gets the
> > value 'nil (i.e., the *symbol* nil) as opposed to '(), which is what nil
> > (unquoted) evaluates to.
> 
> Good catch. Another thing I've found: SawfishConfig does not write (avoid . nil)
> ,or whatever, it writes (avoid . #f) to .sawfish/custom, so I guess that's why it can't
> be set from the UI. #f in scheme-boolean.jl seems fine, it just needs to be "translated"
> before writing, just as #t is.

(I know it's bad to reply twice)

match-window.jl line 350:
(if (eq (cdr cell) '#f) nil (cdr cell))))

so it should already work, but it doesn't. Seems the error is around there.

Chris