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 -r1.10 -r1.11 --- openacs-4/packages/curriculum-central/tcl/uos-procs.tcl 21 Dec 2005 06:33:30 -0000 1.10 +++ openacs-4/packages/curriculum-central/tcl/uos-procs.tcl 24 Dec 2005 08:33:27 -0000 1.11 @@ -394,7 +394,7 @@ @return uos_id The same uos_id passed in, for convenience. } { - # TODO: Implement this proc. + upvar $array row array set assignments [list]