Index: openacs-4/packages/new-portal/tcl/portal-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/tcl/portal-procs.tcl,v diff -u -r1.186 -r1.187 --- openacs-4/packages/new-portal/tcl/portal-procs.tcl 11 Mar 2008 19:31:30 -0000 1.186 +++ openacs-4/packages/new-portal/tcl/portal-procs.tcl 9 Nov 2008 23:29:27 -0000 1.187 @@ -406,39 +406,37 @@ set template " -

- $return_text -

" +

$return_text

" # # Theme selection chunk # set theme_chunk "
- - - [_ new-portal.Change_Theme] -
" +
+
+

[_ new-portal.Change_Theme]

" + set current_theme_id [portal::get_theme_id -portal_id $portal_id] foreach theme [get_theme_info_not_cached] { set theme_id [ns_set get $theme theme_id] set name [ns_set get $theme name] set description [ns_set get $theme description] - append theme_chunk "" } - append theme_chunk "
" + append theme_chunk "
" if {$allow_theme_change_p} { append template "$theme_chunk" } @@ -464,7 +462,7 @@ set tab_toggle_label [lang::util::localize "\#new-portal.Hide_in_main_navigation\#"] } - append template "" + append template "
" # # Page rename chunk @@ -477,25 +475,25 @@ - @@ -529,7 +527,7 @@ append template "
-
- - - - - - + +
+
+
+
+
+
- - - - - +
+
+
+
+
+ \"\"
- +
" } @@ -601,16 +599,16 @@ set layout_id [ns_set get $layout layout_id] set layout_name [ns_set get $layout layout_name] set layout_description [ns_set get $layout layout_description] - set one_layout_chunk " $layout_name - $layout_description" - append layout_chunk "" } @@ -619,16 +617,13 @@ " @@ -658,13 +653,13 @@ @@ -680,12 +675,12 @@ @@ -699,14 +694,14 @@
-
+
[_ new-portal.lt_No_Elements_on_this_p]
[export_vars -form { portal_id page_id return_url { anchor $page_id } }] - +
-
+

- - [_ new-portal.Change_page_layout] -
- - - - +

[_ new-portal.Change_page_layout]

+
+
+
+
$layout_chunk - -
+
- - - -
+
+
+
+
-
+
- - +
+

[_ new-portal.lt_Revert_the_entire_por]

-
+
-
+
- - +
+

[_ new-portal.lt_Revert_all_portals_us]

-
+
-
+
[_ new-portal.lt_Note_Please_be_patien] -
+