webmail bugs fixed

Steve MARECHAL
1 parent 5d663327
Showing 3 changed files with 10 additions and 6 deletions Show diff stats
calexium_lib/web/CXM_dojo.anubis
calexium_lib/web/CXM_making_a_web_site.anubis
calexium_lib/web/CXM_mime.anubis
@@ -552,7 +552,7 @@ public define HTML_In_Form
     InitialValue                selected,
   )=
    // selector_c([attr("dojoType", "dijit.form.ComboBox") . attributes], label, id, name, 1, list_data, selected, non_mandatory).
-  selector_c([], label, id, name, 1, list_data, selected).
+  selector_c(attributes, label, id, name, 1, list_data, selected).
 public define HTML_Off_Form
   dojo_toaster
@@ -1732,8 +1732,11 @@ public define String
      =
    "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\" "+
       "\"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd\">\n".
-   
+public define String
+   html_header
+   =
+   "<html xmlns=\"http://www.w3.org/1999/xhtml\">\n".
    *** [1] States. 
@@ -4297,7 +4300,7 @@ define Printable_tree
          if body is body(options,element) then
          with answer_body = 
             [ doctype_w3c_header,
-              "<html xmlns=\"http://www.w3.org/1999/xhtml\">\n",
+              html_header,
               "<head>\n",
               add_css_styles(css_styles),
               add_css_files(css_files),
@@ -63,6 +63,7 @@ public define String
     String  charset,
     String  text
   )=
-  with text2 = "=?"+charset+"?B?"+to_string(base64_encode(to_byte_array(text)))+"?=",
-  find_and_replace(text2, implode([13,10]), implode([13,10,32])).
-
+  if length(text) > 0 then 
+    with text2 = "=?"+charset+"?B?"+to_string(base64_encode(to_byte_array(text)))+"?=",
+    find_and_replace(text2, implode([13,10]), implode([13,10,32]))
+  else "".