--- capa/capa51/GUITools/quizzer.tcl	2000/02/08 22:18:11	1.15
+++ capa/capa51/GUITools/quizzer.tcl	2000/07/12 15:57:08	1.18
@@ -1,6 +1,29 @@
+# student quiz editor and assembly tool
+#  Copyright (C) 1992-2000 Michigan State University
+#
+#  The CAPA system is free software; you can redistribute it and/or
+#  modify it under the terms of the GNU Library General Public License as
+#  published by the Free Software Foundation; either version 2 of the
+#  License, or (at your option) any later version.
+#
+#  The CAPA system is distributed in the hope that it will be useful,
+#  but WITHOUT ANY WARRANTY; without even the implied warranty of
+#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+#  Library General Public License for more details.
+#
+#  You should have received a copy of the GNU Library General Public
+#  License along with the CAPA system; see the file COPYING.  If not,
+#  write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+#  Boston, MA 02111-1307, USA.
+#
+#  As a special exception, you have permission to link this program
+#  with the TtH/TtM library and distribute executables, as long as you
+#  follow the requirements of the GNU GPL in regard to all of the
+#  software in the executable aside from TtH/TtM.
+
 ###########################################################
 # quizzer.tcl - 
-# Copyright Guy Albertelli II 1996
+# Created Guy Albertelli II 1996
 ###########################################################
 set gTclVer 4.0
 
@@ -287,7 +310,7 @@ proc createInfoWindow {} {
     label $about.l1  -font 12x24 -text "Quizzer $gVer" -pady 20
     label $about.l4  -font 8x13 -text "Quizzer.tcl version $gTclVer" -pady 20
     label $about.l6  -font 8x13 -text "$gCompileDate" 
-    message $about.l2 -font 8x13 -text "Code by: Y. Tsai, G. Albertelli II Copyright Michigan State University Board of Trustees, 1992-1999, No Unauthorized Commercial Use" \
+    message $about.l2 -font 8x13 -text "Code by: Y. Tsai, G. Albertelli II Copyright Michigan State University Board of Trustees, 1992-2000, CAPA is released under to GNU GPL v2, and comes WITHOUT ANY WARRENTY, see COPYING for details" \
 	-pady 20 -aspect 300
     label $about.l3  -font 8x13 -textvariable gDate 
     label $about.l5  -font 8x13 -textvariable gCmd
@@ -1014,8 +1037,7 @@ proc createDateDialog { toplevel makedef
     button $buttonFrame.cancel -text "Cancel" -command "set gPrompt2(ok) 0"
     set gDates(optBut) [ button $buttonFrame.options -text "More Options" \
 			     -command "addDateOptions"]
-    pack $buttonFrame.help $buttonFrame.set $buttonFrame.cancel $buttonFrame.options \
-	-side left
+    pack $buttonFrame.set $buttonFrame.cancel $buttonFrame.options -side left
     bind $toplevel <Destroy> "set gPrompt2(ok) 0"
     bind $toplevel <KeyPress> "getday open;getday due;getday answer"
     bind $toplevel <Return> {tkTabToWindow [tk_focusNext %W]}
@@ -1145,7 +1167,7 @@ proc changeDate { listbox } {
 	}
     }
     capaGrab release $changeDate
-    bind $changeDate <Destroy> ""
+    catch {bind $changeDate <Destroy> ""}
     destroy $changeDate
     if {$gPrompt2(ok) == 1 } {
 	addCurrentDates $listbox $makedefault $which
@@ -1196,7 +1218,7 @@ proc addDate { listbox } {
 	}
     }
     capaGrab release $addDate
-    bind $addDate <Destroy> ""
+    catch {bind $addDate <Destroy> ""}
     destroy $addDate
     if {$gPrompt2(ok) == 1 } {
 	addCurrentDates $listbox $makedefault