Index: openacs-4/packages/dotlrn/tcl/apm-callback-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/apm-callback-procs.tcl,v diff -u -r1.3.2.2 -r1.3.2.3 --- openacs-4/packages/dotlrn/tcl/apm-callback-procs.tcl 13 Dec 2005 15:32:35 -0000 1.3.2.2 +++ openacs-4/packages/dotlrn/tcl/apm-callback-procs.tcl 13 Dec 2005 17:04:07 -0000 1.3.2.3 @@ -152,7 +152,6 @@ } } 2.1.3 2.2.0a1 { - ns_log Warning "vguerra doing upgrade from 2.1.3 to 2.2.0a1" #Setting the default Site Template set site_template_id [db_string select_st_id "select site_template_id from dotlrn_site_templates where pretty_name = '#new-portal.sloan_theme_name#'"] Index: openacs-4/packages/dotlrn/tcl/community-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.tcl,v diff -u -r1.191.2.18 -r1.191.2.19 --- openacs-4/packages/dotlrn/tcl/community-procs.tcl 13 Dec 2005 15:32:35 -0000 1.191.2.18 +++ openacs-4/packages/dotlrn/tcl/community-procs.tcl 13 Dec 2005 17:04:07 -0000 1.191.2.19 @@ -2360,20 +2360,16 @@ {-community_id:required} } { } { - ns_log Warning "vguerra obteniendo template de commr $community_id proc cached" set dotlrn_package_id [dotlrn::get_package_id] set comm_site_template_id [db_string select_site_template_id {} -default "0"] if {[parameter::get -package_id $dotlrn_package_id -parameter AdminChangeSiteTemplate_p]} { - ns_log Warning "vguerra cached 1" set site_template_id [get_site_template_id -community_id $community_id] } else { - ns_log Warning "vguerra cached 2" set site_template_id [parameter::get -package_id $dotlrn_package_id -parameter CommDefaultSiteTemplate_p] if {$site_template_id != $comm_site_template_id} { set_site_template_id -community_id $community_id -site_template_id $site_template_id } } - ns_log Warning "vguerra retornando del proc cacheado" return $site_template_id } } Index: openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl,v diff -u -r1.74.8.4 -r1.74.8.5 --- openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl 13 Dec 2005 15:32:35 -0000 1.74.8.4 +++ openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl 13 Dec 2005 17:04:07 -0000 1.74.8.5 @@ -417,7 +417,6 @@ Sets the site_template_id for a given user } { set portal_id [dotlrn::get_portal_id -user_id $user_id] - ns_log Warning "tratando con vguerra $site_template_id" set new_theme_id [db_string select_portal_theme {}] db_dml update_portal_theme {} db_dml update_user_site_template {} @@ -431,7 +430,6 @@ Returns the master configured for the user_id } { set site_template_id [get_site_template_id -user_id $user_id] - ns_log Warning "vguerra obteniendo template de user $user_id" return [get_master_from_site_template_id -site_template_id $site_template_id] } @@ -447,20 +445,16 @@ {-user_id:required} } { } { - ns_log Warning "vguerra obteniendo template de user $user_id proc cached" set dotlrn_package_id [dotlrn::get_package_id] set user_site_template_id [db_string select_site_template_id {} -default "0"] if {[parameter::get -package_id $dotlrn_package_id -parameter UserChangeSiteTemplate_p]} { - ns_log Warning "vguerra cached 1" set site_template_id $user_site_template_id } else { - ns_log Warning "vguerra cached 2" set site_template_id [parameter::get -package_id $dotlrn_package_id -parameter UserDefaultSiteTemplate_p] if {$site_template_id != $user_site_template_id} { set_site_template_id -user_id $user_id -site_template_id $site_template_id } } - ns_log Warning "vguerra retornando del proc cacheado" return $site_template_id } Index: openacs-4/packages/dotlrn/www/dotlrn-master-custom.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/dotlrn-master-custom.tcl,v diff -u -r1.1.2.1 -r1.1.2.2 --- openacs-4/packages/dotlrn/www/dotlrn-master-custom.tcl 13 Dec 2005 15:32:35 -0000 1.1.2.1 +++ openacs-4/packages/dotlrn/www/dotlrn-master-custom.tcl 13 Dec 2005 17:04:08 -0000 1.1.2.2 @@ -5,7 +5,6 @@ if {![empty_string_p $community_id]} { set dotlrn_master [dotlrn_community::get_dotlrn_master -community_id $community_id] } elseif {$user_id } { - ns_log Warning "vguerra voy a buscar el template de $user_id" set dotlrn_master [dotlrn::get_dotlrn_master -user_id $user_id] } else { set dotlrn_master [parameter::get -package_id $dotlrn_package_id -parameter "DefaultMaster_p" \