Index: openacs-4/packages/dotlrn/www/dotlrn-main-portlet.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/dotlrn-main-portlet.adp,v diff -u -r1.27 -r1.28 --- openacs-4/packages/dotlrn/www/dotlrn-main-portlet.adp 29 May 2002 04:45:23 -0000 1.27 +++ openacs-4/packages/dotlrn/www/dotlrn-main-portlet.adp 31 May 2002 06:23:49 -0000 1.28 @@ -36,13 +36,20 @@ <% - if {![string equal $communities(simple_community_type) "dotlrn_community"] == 1} { + if {![string equal $communities(simple_community_type) dotlrn_community]} { set new_simple_community_type $communities(simple_community_type) } - set new_level $communities(level) + +# if {[string equal $communities(simple_community_type) dotlrn_club]} { +# set new_level [expr $communities(tree_level) - 1] +# } elseif {[string equal $communities(simple_community_type) dotlrn_class_instance]} { +# set new_level [expr $communities(tree_level) - 3] +# } + + set new_level $communities(tree_level) %> - + @@ -65,12 +72,14 @@
  • - @communities.pretty_name@ - - [ - Administer - ] - + + @communities.pretty_name@ + + [ + Administer + ] + +
  • <%