Index: openacs-4/packages/dotlrn/www/dotlrn-master.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/dotlrn-master.tcl,v
diff -u -r1.9.2.4 -r1.9.2.5
--- openacs-4/packages/dotlrn/www/dotlrn-master.tcl	29 Nov 2002 15:10:46 -0000	1.9.2.4
+++ openacs-4/packages/dotlrn/www/dotlrn-master.tcl	13 Mar 2003 12:51:12 -0000	1.9.2.5
@@ -111,7 +111,14 @@
 }
 
 if {$have_comm_id_p} {
+    # We are under a dotlrn package instance
     # get this comm's info
+    if { ![string equal [ad_conn package_key] [dotlrn::package_key]] } {
+        # Peter M: We are in a package (an application) under a dotlrn instance (i.e. in a news instance of a class)
+        # and we want all links in the navbar to be active so the user can return easily to the class homepage
+        set link_all 1
+    }
+
     set portal_id [dotlrn_community::get_portal_id -community_id $community_id]
     set text [dotlrn_community::get_community_header_name $community_id] 
     set link [dotlrn_community::get_community_url $community_id]