Index: openacs-4/packages/assessment/www/asm-admin/change-timing.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/change-timing.tcl,v
diff -u -r1.3 -r1.3.8.1
--- openacs-4/packages/assessment/www/asm-admin/change-timing.tcl	9 Nov 2006 13:01:09 -0000	1.3
+++ openacs-4/packages/assessment/www/asm-admin/change-timing.tcl	18 Aug 2014 20:25:04 -0000	1.3.8.1
@@ -36,17 +36,17 @@
     }
 } -on_submit {
 
-    if {[db_type] == "postgresql"} {
+    if {[db_type] eq "postgresql"} {
 	regsub -all -- {to_date} $start_time {to_timestamp} start_time
 	regsub -all -- {to_date} $end_time {to_timestamp} end_time
     }
     
     foreach assessment $assessment_id {
 	set assessment_rev_id [content::item::get_latest_revision -item_id $assessment]
-	if {![empty_string_p $start_time]} {
+	if {$start_time ne ""} {
 	    db_dml update_start_time {}
 	}
-	if {![empty_string_p $end_time]} {
+	if {$end_time ne ""} {
 	    db_dml update_end_time {}
 	}
     }