Index: openacs-4/packages/evaluation/www/admin/grades/grades-reports.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/www/admin/grades/grades-reports.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/evaluation/www/admin/grades/grades-reports.tcl	10 Jun 2004 21:08:54 -0000	1.5
+++ openacs-4/packages/evaluation/www/admin/grades/grades-reports.tcl	15 Jun 2004 23:20:29 -0000	1.6
@@ -77,6 +77,6 @@
 
 
 
-db_multirow grades_report $query_name { *SQL* } {
-
+db_multirow -extend { student_url } grades_report $query_name { *SQL* } {
+    set student_url [export_vars -base "student-grades-report" -url { {student_id $user_id} }]
 }