Index: openacs-4/packages/workflow/www/admin/action-ae.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/www/admin/action-ae.tcl,v
diff -u -N -r1.5 -r1.6
--- openacs-4/packages/workflow/www/admin/action-ae.tcl	26 Oct 2011 01:11:55 -0000	1.5
+++ openacs-4/packages/workflow/www/admin/action-ae.tcl	17 Sep 2013 19:10:35 -0000	1.6
@@ -74,7 +74,7 @@
     set callback_list [list]
     foreach callback_name [split $callbacks "\n"] {
 	set callback_name [string trim $callback_name]
-	if {![empty_string_p $callback_name]} {
+	if {$callback_name ne ""} {
 	    lappend callback_list $callback_name
 	}
     }
@@ -118,7 +118,7 @@
     set callback_list [list]
     foreach callback_name [split $callbacks "\n"] {
 	set callback_name [string trim $callback_name]
-	if {![empty_string_p $callback_name]} {
+	if {$callback_name ne ""} {
 	    lappend callback_list $callback_name
 	}
     }