Index: openacs-4/packages/dotlrn-catalog/tcl/dotlrn-catalog-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-catalog/tcl/dotlrn-catalog-procs.tcl,v
diff -u -N -r1.4 -r1.4.2.1
--- openacs-4/packages/dotlrn-catalog/tcl/dotlrn-catalog-procs.tcl	3 Mar 2005 22:33:36 -0000	1.4
+++ openacs-4/packages/dotlrn-catalog/tcl/dotlrn-catalog-procs.tcl	31 May 2005 23:13:08 -0000	1.4.2.1
@@ -273,3 +273,13 @@
     
     return $return_list
 }
+
+ad_proc -public dotlrn_catalog::get_course_data {
+    {-course_id:required}
+} {
+    Returns the course information (name,key and description) in the array course_data
+    
+} {
+    upvar course_data course_data
+    return [db_0or1row get_data {} -column_array course_data]
+}
\ No newline at end of file