Index: openacs-4/packages/xowiki/lib/view.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/lib/view.tcl,v
diff -u -N -r1.7 -r1.8
--- openacs-4/packages/xowiki/lib/view.tcl	22 Oct 2006 15:33:42 -0000	1.7
+++ openacs-4/packages/xowiki/lib/view.tcl	30 Nov 2006 16:34:15 -0000	1.8
@@ -1,29 +1,29 @@
 set parameter [subst {
-  {-m view}
-  {-return_url "[ns_conn url]"}
-  {-template_file "view-links"}
-  {-folder_id 0}
+    {-m view}
+    {-return_url "[ns_conn url]"}
+    {-template_file "view-links"}
+    {-folder_id 0}
 }]
 
 # TODO the following should be done more elegantly
 set actual_query [expr {[info exists template_file] ? "template_file=$template_file" : " "}]
 
 if {[info exists url]} {
-  # new style, the url is sufficient
-  ::xowiki::Package initialize -parameter $parameter -url $url -actual_query $actual_query 
+    # new style, the url is sufficient
+    ::xowiki::Package initialize -parameter $parameter -url $url -actual_query $actual_query 
 } else {
-  # old style, use item_id
-  set page [::xowiki::Package instantiate_page_from_id \
-                -item_id $item_id -parameter $parameter]
-  ::xo::cc export_vars
+    # old style, use item_id
+    set page [::xowiki::Package instantiate_page_from_id \
+		  -item_id $item_id -parameter $parameter]
+    ::xo::cc export_vars
 }
 
 set html [::$package_id invoke -method $m]
 
 if {![info exists css]} {
-  set fn [get_server_root]/packages/xowiki/www/resources/xowiki.css
-  set F [open $fn]; set css [read $F]; close $F
-  set css "<style type='text/css'>$css</style>"
-  set html $css$html
+    set fn [get_server_root]/packages/xowiki/www/resources/xowiki.css
+    set F [open $fn]; set css [read $F]; close $F
+    set css "<style type='text/css'>$css</style>"
+    set html $css$html
 }