Index: openacs-4/packages/curriculum-central/tcl/uos-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/curriculum-central/tcl/uos-procs.tcl,v
diff -u -N -r1.29 -r1.30
--- openacs-4/packages/curriculum-central/tcl/uos-procs.tcl	22 Feb 2006 06:28:38 -0000	1.29
+++ openacs-4/packages/curriculum-central/tcl/uos-procs.tcl	29 Mar 2006 22:45:45 -0000	1.30
@@ -1330,7 +1330,12 @@
 	set user_id [ad_conn user_id]
     }
 
-    set ga_list [db_list_of_lists select_ga {}]
+    set ga_list [list]
+    db_foreach select_ga {} {
+	set ga_name "[lang::util::localize $name] ($identifier)"
+	
+	lappend ga_list [list $ga_name $gradattr_id]
+    }
 
     return $ga_list
 }