#!/usr/local/bin/mwish -f

require CommandWindow

frame .f
pack append . .f {fill expand}

button .f.cmd -text  CommandWindow -command {CommandWindow show}
button .f.quit -text Quit -command exit
button .f.sels -text Sels -command {CommandWindow sels}

pack append .f \
	.f.cmd  {top fill expand} \
	.f.quit {top fill expand} \
	.f.sels {top fill expand}

wm minsize . 1 1
