Index: openacs-4/packages/lorsm/www/delivery/exit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/delivery/exit.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/lorsm/www/delivery/exit.tcl	7 Jun 2006 14:05:44 -0000	1.3
+++ openacs-4/packages/lorsm/www/delivery/exit.tcl	13 Aug 2007 09:20:16 -0000	1.4
@@ -17,7 +17,7 @@
 } 
 
 #set the following accordingly
-set level "Notice"
+set level "debug"
 
     set track_id [ad_get_client_property lorsm currenttrackid]
     set lorsmstudenttrack [ad_get_client_property lorsm studenttrack]
@@ -40,17 +40,16 @@
     ad_set_client_property lorsm currenttrackid ""
     ad_set_client_property lorsm studenttrack ""
     if { $track_id == 0 || $track_id == "" } {
-	ns_log $level "SCORM leaving non rte-inited (or better a rte-finished) course"
+	ns_log $level "delivery/exit leaving non rte-inited (or better a rte-finished) course"
 	} else {
-	ns_log $level "SCORM leaving course which had been rte-inited but NOT FINISHED (user forcing exit before time) (lorsm_cmi_core.track_id=$track_id)"
+	ns_log $level "delivery/exit leaving course which had been rte-inited but NOT FINISHED (user forcing exit before time) (lorsm_cmi_core.track_id=$track_id)"
     }
     if { $lorsmstudenttrack == 0 || $lorsmstudenttrack == "" } {
-	ns_log $level "SCORM leaving non istrackable course"
+	ns_log $level "delivery/exit leaving non istrackable course"
 	} else {
-	ns_log $level "SCORM leaving course which was either istrackable or rte-inited (lorsm_student_track.track_id=$lorsmstudenttrack"
+	ns_log $level "delivery/exit leaving course which was either istrackable or rte-inited (lorsm_student_track.track_id=$lorsmstudenttrack"
     }
 
 # redirects
-ns_log Warning "RETURN $return_url"
-
+ns_log $level "delivery/exit $return_url"
    ad_returnredirect $return_url