bugfix window-head (float-window)

The first head in the list was always returned, even if a suitable head
was found.  This prettier version fixes that.