Index: openacs-4/packages/dotlrn/catalog/dotlrn.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/catalog/dotlrn.en_US.ISO-8859-1.xml,v diff -u -r1.47.2.4 -r1.47.2.5 --- openacs-4/packages/dotlrn/catalog/dotlrn.en_US.ISO-8859-1.xml 21 Feb 2007 12:03:17 -0000 1.47.2.4 +++ openacs-4/packages/dotlrn/catalog/dotlrn.en_US.ISO-8859-1.xml 4 Mar 2007 19:57:12 -0000 1.47.2.5 @@ -687,4 +687,5 @@ Your icon is too large. The publisher of %system_name% has chosen to limit attachments to %max_attachments_bytes% bytes.\n You're editing You've chosen to add + Page Index: openacs-4/packages/dotlrn/www/community-types-chunk.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/community-types-chunk.adp,v diff -u -r1.4.12.1 -r1.4.12.2 --- openacs-4/packages/dotlrn/www/community-types-chunk.adp 3 Mar 2007 22:54:23 -0000 1.4.12.1 +++ openacs-4/packages/dotlrn/www/community-types-chunk.adp 4 Mar 2007 19:57:12 -0000 1.4.12.2 @@ -20,13 +20,7 @@

#dotlrn.Community_Types#@title@

- - - - - - -
@community_types.pretty_name@
+ Index: openacs-4/packages/dotlrn/www/community-types-chunk.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/community-types-chunk.tcl,v diff -u -r1.6 -r1.6.2.1 --- openacs-4/packages/dotlrn/www/community-types-chunk.tcl 8 Aug 2006 21:26:24 -0000 1.6 +++ openacs-4/packages/dotlrn/www/community-types-chunk.tcl 4 Mar 2007 19:57:12 -0000 1.6.2.1 @@ -27,6 +27,15 @@ set community_type [dotlrn_community::get_community_type] +template::list::create -name community_types -multirow community_types -elements { + type { + label "" + display_template { + @community_types.pretty_name@ + } + } +} + db_multirow community_types select_community_types {} if { ! [parameter::get -parameter SelfRegistrationP -package_id [dotlrn::get_package_id] -default 1] && [template::multirow size community_types] == 0 } { Index: openacs-4/packages/dotlrn/www/element-list.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/element-list.adp,v diff -u -r1.2.2.1 -r1.2.2.2 --- openacs-4/packages/dotlrn/www/element-list.adp 4 Mar 2007 00:17:38 -0000 1.2.2.1 +++ openacs-4/packages/dotlrn/www/element-list.adp 4 Mar 2007 19:57:12 -0000 1.2.2.2 @@ -4,27 +4,6 @@
- - - - - - - - - - - - - - - - - - -
IDTypeNamePage
@portal_elements.element_id@@portal_elements.name@@portal_elements.pretty_name@@portal_elements.sort_key@
- - - - + + Index: openacs-4/packages/dotlrn/www/element-list.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/element-list.tcl,v diff -u -r1.2 -r1.2.2.1 --- openacs-4/packages/dotlrn/www/element-list.tcl 8 Aug 2006 21:26:24 -0000 1.2 +++ openacs-4/packages/dotlrn/www/element-list.tcl 4 Mar 2007 19:57:12 -0000 1.2.2.1 @@ -16,6 +16,23 @@ set id_portal [dotlrn_community::get_portal_id] +template::list::create -name portal_elements -multirow portal_elements -elements { + id { + label "\#dotlrn.ID\#" + display_template { + @portal_elements.element_id@ + } + } + name { + label "\#dotlrn.Type\#" + } + pretty_name { + label "\#dotlrn.Name\#" + } + sort_key { + label "\#dotlrn.Page\#" + } +} db_multirow portal_elements itens { Index: openacs-4/packages/dotlrn/www/manage-memberships.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/manage-memberships.tcl,v diff -u -r1.13 -r1.13.2.1 --- openacs-4/packages/dotlrn/www/manage-memberships.tcl 15 Dec 2006 22:45:22 -0000 1.13 +++ openacs-4/packages/dotlrn/www/manage-memberships.tcl 4 Mar 2007 19:57:12 -0000 1.13.2.1 @@ -132,10 +132,71 @@ set n_member_classes [db_string select_n_member_classes {}] +template::list::create -name member_classes -multirow member_classes -pass_properties { show_drop_button_p referer } -html {width 100%} -elements { + name { + html {align left width 55%} + label "[_ dotlrn.class_instances_pretty_name]" + display_template { + @member_classes.pretty_name@ + } + } + term { + html {width 20%} + label "\#dotlrn.Term\#" + display_template {@member_classes.term_name@ @member_classes.term_year@} + } + role { + html {width 20%} + label "\#dotlrn.Role\#" + } + actions { + label "\#dotlrn.Actions\#" + html {align right width 5%} + display_template { + + \[ #dotlrn.Pending_Approval# \] + + + + + + + } + } +} + db_multirow member_classes $member_query {} { set role [template::util::nvl [dotlrn_community::get_role_pretty_name -community_id $class_instance_id -rel_type $rel_type] [_ dotlrn.student_role_pretty_name]] } +template::list::create -name member_clubs -multirow member_clubs -pass_properties { show_drop_button_p referer } -html {width 100%} -elements { + name { + html {align left width 75%} + label "[_ dotlrn.clubs_pretty_name]" + display_template { + @member_clubs.pretty_name@ + } + } + role { + label "\#dotlrn.Role\#" + html {width 20%} + } + actions { + label "\#dotlrn.Actions\#" + html {align right width 5%} + display_template { + + \[ \#dotlrn.Pending_Approval\# \] + + + + + + + } + } +} + db_multirow member_clubs select_member_clubs {} { set role [dotlrn_community::get_role_pretty_name -community_id $club_id -rel_type $rel_type] } @@ -193,10 +254,91 @@ } set n_non_member_classes [db_string select_n_non_member_classes {}] + +template::list::create -name non_member_classes -multirow non_member_classes -pass_properties { show_drop_button_p referer swa_p} -html {width 100%} -elements { + name { + html {align left width 30%} + label "[_ dotlrn.classes_pretty_name]" + display_template { + + @non_member_classes.pretty_name@ + @non_member_classes.pretty_name@ + + + @non_member_classes.pretty_name@ + + } + } + descrption { + html {align left width 30%} + label "\#dotlrn.Description\#" + display_template {@non_member_classes.description;noquote@} + } + term { + label "\#dotlrn.Term\#" + display_template {@non_member_classes.term_name@ @non_member_classes.term_year@} + } + start_date { + html {align right} + label "\#dotlrn.Start_date\#" + display_template {@non_member_classes.active_start_date@ - @non_member_classes.active_end_date@} + } + actions { + label "\#dotlrn.Actions\#" + html {align right width 5%} + display_template { + + + + + + + } + } +} + db_multirow non_member_classes $non_member_query {} { regsub -all {

} $description {
} description } +template::list::create -name non_member_clubs -multirow non_member_clubs -pass_properties { show_drop_button_p referer swa_p} -html {width 100%} -elements { + name { + html {align left width 30%} + label "[_ dotlrn.clubs_pretty_name]" + display_template { + + @non_member_clubs.pretty_name@ + @non_member_clubs.pretty_name@ + + + @non_member_clubs.pretty_name@ + + } + } + descrption { + html {align left width 30%} + label "\#dotlrn.Description\#" + display_template {@non_member_clubs.description;noquote@} + } + start_date { + html {align right} + label "\#dotlrn.Start_date\#" + display_template {@non_member_clubs.active_start_date@ - @non_member_clubs.active_end_date@} + } + actions { + label "\#dotlrn.Actions\#" + html {align right width 5%} + display_template { + + + + + + + } + } +} + db_multirow non_member_clubs select_non_member_clubs {} { regsub -all {

} $description {
} description } Index: openacs-4/packages/dotlrn/www/admin/community-types.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/community-types.adp,v diff -u -r1.2 -r1.2.6.1 --- openacs-4/packages/dotlrn/www/admin/community-types.adp 11 May 2005 13:40:25 -0000 1.2 +++ openacs-4/packages/dotlrn/www/admin/community-types.adp 4 Mar 2007 19:57:12 -0000 1.2.6.1 @@ -15,42 +15,8 @@
+ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
#dotlrn.Community_Type##dotlrn.Pretty_Name##dotlrn.Description#
@community_types.community_type@@community_types.pretty_name@@community_types.description@
- #dotlrn.no_community_types# -
-
Index: openacs-4/packages/dotlrn/www/admin/community-types.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/community-types.tcl,v diff -u -r1.1 -r1.1.6.1 --- openacs-4/packages/dotlrn/www/admin/community-types.tcl 28 Jul 2004 07:23:44 -0000 1.1 +++ openacs-4/packages/dotlrn/www/admin/community-types.tcl 4 Mar 2007 19:57:12 -0000 1.1.6.1 @@ -21,6 +21,21 @@ set title "[_ dotlrn.Community_Types]" set context_bar [list $title] +template::list::create -name community_types -multirow community_types -no_data { "\#dotlrn.no_community_types\#" } -elements { + type { + label "\#dotlrn.Community_Type\#" + display_template { + @community_types.community_type@ + } + } + pretty_name { + label "\#dotlrn.Pretty_Name\#" + } + description { + label "\#dotlrn.Description\#" + } +} + db_multirow -extend { edit_url } community_types select_community_types { *SQL* } {