Index: openacs-4/packages/evaluation/www/admin/evaluations/evaluate-students-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/www/admin/evaluations/evaluate-students-2.tcl,v
diff -u -r1.16 -r1.17
--- openacs-4/packages/evaluation/www/admin/evaluations/evaluate-students-2.tcl	24 Oct 2006 10:54:18 -0000	1.16
+++ openacs-4/packages/evaluation/www/admin/evaluations/evaluate-students-2.tcl	15 Dec 2006 22:45:30 -0000	1.17
@@ -178,7 +178,6 @@
 	    # Unfortunately, we can only calculate the file size after the lob is uploaded 
 	    db_dml lob_size { *SQL* }
 	}
-	
 	foreach party_id [array names grades_gs] {
 	    if { ![info exists comments_gs($party_id)] } {
 		set comments_gs($party_id) ""
@@ -201,10 +200,10 @@
 		
 		content::item::set_live_revision -revision_id $revision_id
 		
-		if { [string eq $new_p_gs($party_id) 0] } {
-		    # if editing the grade and suscribed, send the notification
-		    evaluation::notification::do_notification -task_id $task_id -evaluation_id $revision_id -package_id [ad_conn package_id] -notif_type one_evaluation_notif -subset [list $party_id]
-		}
+			if { [string eq $new_p_gs($party_id) 0] } {
+				# notify the user if suscribed
+				evaluation::notification::do_notification -task_id $task_id -evaluation_id $revision_id -package_id [ad_conn package_id] -notif_type one_evaluation_notif -subset [list $party_id]
+			}
 		
 	    }
 	}
@@ -274,8 +273,8 @@
 	    
 	    content::item::set_live_revision -revision_id $revision_id
 
-	    # notify the user if suscribed
-	    evaluation::notification::do_notification -task_id $task_id -evaluation_id $revision_id -package_id [ad_conn package_id] -notif_type one_evaluation_notif -subset [list $party_id]
+	    # notify the user (if suscribed)
+        evaluation::notification::do_notification -task_id $task_id -evaluation_id $revision_id -package_id [ad_conn package_id] -notif_type one_evaluation_notif -subset [list $party_id]
 
 	}
     }