diff --git a/web/CXM_making_a_web_site.anubis b/web/CXM_making_a_web_site.anubis
index e0f4a1c..6c221ea 100644
--- a/web/CXM_making_a_web_site.anubis
+++ b/web/CXM_making_a_web_site.anubis
@@ -3924,70 +3924,74 @@ define Printable_tree
    // The function below formats a datum of type 'HTML_Any($T)'. 
    
 define Printable_tree
-   format
-     ( 
-       CommonInfo                 cinfo, 
-       String                     sn,              // state_name 
-       Var(Int)                 ic_v, 
-       HTML_Any($T)               element,
-       $T -> Printable_tree       format_element,  // able to format a datum of type $T
-       Bool                       is_https,
-     ) =
-   if cinfo is info(common_name,http_port,https_port,site_directory,secret) then 
-   if element is 
-     {
-       any_text(opts,t)              then 
-         ["<span", format_text_options(opts), ">",t,"</span>"], 
-       any_preformated(opts,s)       then 
-         ["<span", format_text_options(opts), "><pre>",s,"</pre></span>"], 
-         //["<pre>",s,"</pre>"], 
-       any_paragraph(opts,e)         then 
-         ["<p", format_text_options(opts), ">",format_element(e),"</p>\n"], 
-       any_image(opts, url, alt)                then 
-         ["<img alt=\"",alt,"\" src=\"",url,"\" ", format_attrs(opts)," />"],
-       any_image(opts, url, alt, w, h)            then 
-         ["<img alt=\"",alt,"\" src=\"",url,"\" width=\"",w,"\" height=\"",h,"\" ", format_attrs(opts)," />"],
-       any_table(opts,h_row, rows, f_row) then 
-         ["<table",format(reverse(opts),false),">",
-            format(h_row, format_element),
-            "<tbody>",format(rows,format_element),"</tbody>",
-            format(f_row, format_element),
-            "</table>\n"],
-       any_center(e)                 then 
-         ["<center>",format_element(e),"</center>"], 
-       any_mail_to(email,elem)       then
-         ["<a href=\"mailto:",email,"\">",format_element(elem),"</a>"], 
-       any_scroller(w,h,cw,ch,c)     then 
-         format_scroller(sn,w,h,cw,ch,new_idnum(ic_v),c,format_element), 
-       any_fixed_size(w,h,c)         then 
-         with url = create_secondary_document(site_directory,secret,sn,format_element,c,w), 
-         ["<object data=\"",url,"\" type=\"text/html\" width=\"",format(w),"\" height=\"",format(h),"\" >",
-             "secondary document",
-          "</object>"], 
-       any_fixed_size_2(w,h,fn)        then
-         with url = fn+"?zauth="+make_authorization(site_directory,secret,
-                 fn),
-         ["<object data=\"",url,"\" type=\"text/html\" width=\"",format(w),"\" height=\"",format(h),"\" >",
-             "secondary document",
-          "</object>"],          
-       any_actioner(c,t,a,an,eo,ja,fn)  then 
-         format_actioner(cinfo,sn,c,t,a,an,eo,ja,fn,is_https),
-         
-       any_foreign_link_new(target, aspect, url)    then
-         format_foreign_link(target, aspect, url, is_https),
-         
-       any_foreign_link(options,url)    then
-         ["<a href=\"",url,"\" ", format_text_options(options), "></a>"],  // IE7 doesn't support the form <a href="..." />
-       any_foreign_link(options,url,name)    then
-         ["<a href=\"",url,"\"><span ", format_text_options(options), ">",name,"</span></a>"], 
-       any_private_download(url,name,extra_ext,action)  then 
-         format_private_download(cinfo,sn,url,name,extra_ext,action),
-       any_div(options, e)                   then
-         [format_div_option(options), format_element(e),"</div>\n"],
-       any_div_empty(options)                then
-         [format_div_option(options), "</div>\n"],
-       any_coreattrs(attributs)              then
-         [format_attrs(attributs)]
+  format
+  ( 
+    CommonInfo                 cinfo, 
+    String                     sn,              // state_name 
+    Var(Int)                 ic_v, 
+    HTML_Any($T)               element,
+    $T -> Printable_tree       format_element,  // able to format a datum of type $T
+    Bool                       is_https,
+  ) =
+  if cinfo is info(common_name,http_port,https_port,site_directory,secret) then 
+  if element is 
+  {
+    any_text(opts , t)            then 
+      if opts is
+      {
+        []      then [t],
+        [_ . _] then ["<span", format_text_options(opts), ">",t,"</span>"]
+      },
+    any_preformated(opts,s)       then 
+     ["<span", format_text_options(opts), "><pre>",s,"</pre></span>"], 
+     //["<pre>",s,"</pre>"], 
+    any_paragraph(opts,e)         then 
+     ["<p", format_text_options(opts), ">",format_element(e),"</p>\n"], 
+    any_image(opts, url, alt)                then 
+     ["<img alt=\"",alt,"\" src=\"",url,"\" ", format_attrs(opts)," />"],
+    any_image(opts, url, alt, w, h)            then 
+     ["<img alt=\"",alt,"\" src=\"",url,"\" width=\"",w,"\" height=\"",h,"\" ", format_attrs(opts)," />"],
+    any_table(opts,h_row, rows, f_row) then 
+     ["<table",format(reverse(opts),false),">",
+        format(h_row, format_element),
+        "<tbody>",format(rows,format_element),"</tbody>",
+        format(f_row, format_element),
+        "</table>\n"],
+    any_center(e)                 then 
+     ["<center>",format_element(e),"</center>"], 
+    any_mail_to(email,elem)       then
+     ["<a href=\"mailto:",email,"\">",format_element(elem),"</a>"], 
+    any_scroller(w,h,cw,ch,c)     then 
+     format_scroller(sn,w,h,cw,ch,new_idnum(ic_v),c,format_element), 
+    any_fixed_size(w,h,c)         then 
+     with url = create_secondary_document(site_directory,secret,sn,format_element,c,w), 
+     ["<object data=\"",url,"\" type=\"text/html\" width=\"",format(w),"\" height=\"",format(h),"\" >",
+         "secondary document",
+      "</object>"], 
+    any_fixed_size_2(w,h,fn)        then
+     with url = fn+"?zauth="+make_authorization(site_directory,secret,
+             fn),
+     ["<object data=\"",url,"\" type=\"text/html\" width=\"",format(w),"\" height=\"",format(h),"\" >",
+         "secondary document",
+      "</object>"],          
+    any_actioner(c,t,a,an,eo,ja,fn)  then 
+     format_actioner(cinfo,sn,c,t,a,an,eo,ja,fn,is_https),
+     
+    any_foreign_link_new(target, aspect, url)    then
+     format_foreign_link(target, aspect, url, is_https),
+     
+    any_foreign_link(options,url)    then
+     ["<a href=\"",url,"\" ", format_text_options(options), "></a>"],  // IE7 doesn't support the form <a href="..." />
+    any_foreign_link(options,url,name)    then
+     ["<a href=\"",url,"\"><span ", format_text_options(options), ">",name,"</span></a>"], 
+    any_private_download(url,name,extra_ext,action)  then 
+     format_private_download(cinfo,sn,url,name,extra_ext,action),
+    any_div(options, e)                   then
+     [format_div_option(options), format_element(e),"</div>\n"],
+    any_div_empty(options)                then
+     [format_div_option(options), "</div>\n"],
+    any_coreattrs(attributs)              then
+     [format_attrs(attributs)]
      }. 
    
    
--
libgit2 0.21.4