Index: openacs-4/packages/dotlrn-syllabus/www/syllabus-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-syllabus/www/syllabus-portlet.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/dotlrn-syllabus/www/syllabus-portlet.tcl	4 Dec 2002 09:53:05 -0000	1.3
+++ openacs-4/packages/dotlrn-syllabus/www/syllabus-portlet.tcl	29 May 2003 18:05:05 -0000	1.4
@@ -28,6 +28,7 @@
 }
 
 array set config $cf
+set community_id [dotlrn_community::get_community_id]
 
 set syllabus_info_list [syllabus_portlet::get_syllabus_info_list \
         -community_id [dotlrn_community::get_community_id]
@@ -37,3 +38,15 @@
 set type [lindex $syllabus_info_list 2]
 set live_revision [lindex $syllabus_info_list 3]
 set file_upload_name [lindex $syllabus_info_list 4]
+
+# DRB: community_id will be blank if we're called by the portal package portal preview
+# code for the generic class portlet template.
+
+if { ![string equal $community_id ""] } {
+    set syllabus_info_list [syllabus_portlet::get_syllabus_info_list -community_id $community_id]
+    set public_folder_id [lindex $syllabus_info_list 0]
+    set syllabus_id [lindex $syllabus_info_list 1]
+    set type [lindex $syllabus_info_list 2]
+    set live_revision [lindex $syllabus_info_list 3]
+    set file_upload_name [lindex $syllabus_info_list 4]
+}