Index: openacs-4/packages/dotlrn-catalog/lib/course-chunk.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-catalog/lib/course-chunk.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/dotlrn-catalog/lib/course-chunk.tcl	19 Feb 2005 03:43:11 -0000	1.5
+++ openacs-4/packages/dotlrn-catalog/lib/course-chunk.tcl	22 Feb 2005 22:00:56 -0000	1.6
@@ -41,13 +41,17 @@
 set category_name "[category::get_name [category::get_mapped_categories $course_id]]"
 
 # Check if user has admin permission over course_id
+set admin_p 0
 if { [permission::permission_p -object_id $cc_package_id -privilege "create"] } { 
     set item_id [dotlrn_catalog::get_item_id -revision_id $course_id]
-    set admin_p [permission::permission_p -object_id $item_id -privilege "admin"]
-} else {
-    set admin_p 0
+    if { [permission::permission_p -object_id $course_id -privilege "admin"] } { 
+	set admin_p 1
+    } else {
+	set admin_p 0
+    }
 }
 
+
 set obj_n 0
 set dotlrn_class "("
 set dotlrn_com "("