Index: openacs-4/packages/dotlrn-assessment/tcl/dotlrn-assessment-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-assessment/tcl/dotlrn-assessment-procs.tcl,v
diff -u -N -r1.5 -r1.6
--- openacs-4/packages/dotlrn-assessment/tcl/dotlrn-assessment-procs.tcl	2 Nov 2005 20:29:17 -0000	1.5
+++ openacs-4/packages/dotlrn-assessment/tcl/dotlrn-assessment-procs.tcl	27 Oct 2014 16:41:17 -0000	1.6
@@ -3,7 +3,7 @@
     Procs to set up the dotLRN assessment applet
     
     @author jopez@galileo.edu
-    @cvs_id $Id$
+    @cvs-id $Id$
 }
 
 namespace eval dotlrn_assessment {}
@@ -219,7 +219,7 @@
     
     
     set new_assessment_id [db_nextval acs_object_id_seq]
-    if {[empty_string_p $name]} {
+    if {$name eq ""} {
 	set name "ASS_$new_assessment_id"
     }
     set new_assessment_id [content::item::new -item_id $new_assessment_id -parent_id $folder_id -content_type {as_assessments} -name $name]