-- Changed packing order so buttons don't disappear.

This commit is contained in:
dfs
2000-03-25 23:59:30 +00:00
parent 9d1fcb19bf
commit a6a3dffbd6

View File

@@ -12,7 +12,7 @@
#
#--------------------------------------------------------------
# $Id: tkremind,v 1.28 2000-02-18 03:55:47 dfs Exp $
# $Id: tkremind,v 1.29 2000-03-25 23:59:30 dfs Exp $
# the next line restarts using wish \
exec wish "$0" "$@"
@@ -366,7 +366,6 @@ proc CreateCalWindow { dayNames } {
pack .h -side top -expand 0 -fill x
CreateCalFrame .cal $dayNames
pack .cal -side top -fill both -expand 1
frame .b
button .b.prev -text {<-} -command {MoveMonth -1}
@@ -381,7 +380,8 @@ proc CreateCalWindow { dayNames } {
pack .b.prev .b.this .b.next .b.goto .b.print .b.options .b.quit -side left -fill x
pack .b.status -side left -fill x -expand 1
pack .b.nqueued -side left -fill x
pack .b -side top -fill x -expand 0
pack .b -side bottom -fill x -expand 0
pack .cal -side top -fill both -expand 1
wm title . "TkRemind"
wm iconname . ""
wm protocol . WM_DELETE_WINDOW Quit