diff --git a/scripts/tkremind b/scripts/tkremind
index 84a3c216..69ab1341 100755
--- a/scripts/tkremind
+++ b/scripts/tkremind
@@ -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