Index: openacs-4/packages/evaluation/www/admin/evaluations/evaluation-delete-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/www/admin/evaluations/evaluation-delete-2.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/evaluation/www/admin/evaluations/evaluation-delete-2.tcl	10 Jun 2004 21:08:53 -0000	1.2
+++ openacs-4/packages/evaluation/www/admin/evaluations/evaluation-delete-2.tcl	30 Jul 2004 22:50:10 -0000	1.3
@@ -12,9 +12,10 @@
 	operation
 } 
 
-if { [string eq $operation "[_ evaluation.lt_Yes_I_really_want_to_]"] } {
-    db_transaction {
+ns_log notice "por comprarar ($operation) con ([_ evaluation.lt_Yes_I_really_want_to_]) \n"
 
+if { [string eq $operation [_ evaluation.lt_Yes_I_really_want_to_]] } {
+    db_transaction {
 		db_exec_plsql delete_evaluation { *SQL* }		
 		
     } on_error {