none ->unset category

Ignore-this: 7e407d49c1358fa0e4fc40badcbb3ae5

darcs-hash:20110123015300-067c0-60bc66b687af0299c11023c918bca02d83a658cf.gz

1 files changed, 3 insertions, 3 deletions

diff --git a/GradeBook.tcl b/GradeBook.tcl
index 6aa7963..d81bc4e 100755
--- a/GradeBook.tcl
+++ b/GradeBook.tcl
@@ -398,7 +398,7 @@ proc UserUnHideColumn { permission_list user } {
 
 proc ChangeColumn { permission_list user } {
 	set columnname [::ncgi::value columnname {}]
-	set category "none"
+	set category "unset"
 	set category  [SelectColValue4User $columnname _Col_Category_]
 	set maxpoints [SelectColValue4User $columnname _Max_Points_]
 
@@ -412,7 +412,7 @@ proc ChangeColumn { permission_list user } {
 	puts $out_str
 	# opt list has option name and corresponding text pairs
 	set opt_list [list \
-		none --Select--\
+		unset --Select--\
 	       	Quiz Quiz\
 	       	HomeWork HomeWork\
 	       	LabReport LabReport\
@@ -682,7 +682,7 @@ proc AddColumnRequest { permission_list user } {
 	puts "<form name=\"input\"  method=\"post\" />"
 	puts {Column Name: <input type="text" name="columnname2add"><br>}
 	puts {Category: <select name="column_category">}
-	puts {<option value="none">--Select--</option>}
+	puts {<option value="unset">--Select--</option>}
 	puts {<option value="Quiz">Quiz</option>}
 	puts {<option value="HomeWork">HomeWork</option>}
 	puts {<option value="LabReport">LabReport</option>}