# WindowList replacement
# Written by: Maciej Delmanowski <harnir@linux.net.pl>

DestroyFunc Window-List-Page
AddToFunc Window-List-Page
+ I WindowList (CurrentPage) "$*" Function Window-ListFunc CurrentAtEnd CurrentDesk NoGeometry MaxLabelWidth 40 NoIcons NoCurrentDeskTitle NoHotkeys SelectOnRelease $[SelectOnReleaseKey]

DestroyFunc Window-List
AddToFunc Window-List
+ I WindowList "$*" Function Window-ListFunc CurrentAtEnd CurrentDesk NoGeometry MaxLabelWidth 40 NoIcons NoCurrentDeskTitle NoHotkeys SelectOnRelease $[SelectOnReleaseKey]

DestroyFunc Window-ListFunc
AddToFunc Window-ListFunc
+ I Focus-DefaultDesk

