diff --git a/calexium_lib/web/CXM_making_a_web_site.anubis b/calexium_lib/web/CXM_making_a_web_site.anubis index d8b92cc..35d4a7e 100644 --- a/calexium_lib/web/CXM_making_a_web_site.anubis +++ b/calexium_lib/web/CXM_making_a_web_site.anubis @@ -985,8 +985,8 @@ public type HTML_In_Form: text (List(Text_Option), String the_text), preformated (List(Text_Option), String), paragraph (List(Text_Option), HTML_In_Form content), - image (String url), - image (String url, Int32 width, Int32 height), + image (List(CoreAttrs), String url, String alternate), + image (List(CoreAttrs), String url, String alternate, Int32 width, Int32 height), table (List(Table_Option), HTML_Header_Row(HTML_In_Form), List(HTML_Row(HTML_In_Form)), HTML_Footer_Row(HTML_In_Form)), center (HTML_In_Form), mail_to (String email, HTML_In_Form element), @@ -1027,6 +1027,10 @@ public type HTML_In_Form: public define HTML_In_Form literal(Printable_tree t) = literal_pt(t). +public define HTML_In_Form image(String url) = image([], url, url). + +public define HTML_In_Form image(String url, Int32 width, Int32 height) = image([], url, url, width, height). + public define HTML_In_Form foreign_link ( @@ -1165,8 +1169,8 @@ public type HTML_Off_Form: text (List(Text_Option), String the_text), preformated (List(Text_Option), String), paragraph (List(Text_Option), HTML_Off_Form content), - image (String url), - image (String url, Int32 width, Int32 height), + image (List(CoreAttrs), String url, String alternate), + image (List(CoreAttrs), String url, String alternate, Int32 width, Int32 height), table (List(Table_Option), HTML_Header_Row(HTML_Off_Form), List(HTML_Row(HTML_Off_Form)), HTML_Footer_Row(HTML_Off_Form)), center (HTML_Off_Form), mail_to (String email, HTML_Off_Form element), @@ -1197,6 +1201,10 @@ public type HTML_Off_Form: 'HTML_Off_Form' defines all the elements you may put outside any form. +public define HTML_Off_Form image(String url) = image([], url, url). + +public define HTML_Off_Form image(String url, Int32 width, Int32 height) = image([], url, url, width, height). + public define HTML_Off_Form form ( @@ -2417,8 +2425,8 @@ type HTML_Any($T): any_text (List(Text_Option), String the_text), any_preformated (List(Text_Option), String), any_paragraph (List(Text_Option), $T content), - any_image (String url), - any_image (String url, Int32 width, Int32 height), + any_image (List(CoreAttrs), String url, String alternate), + any_image (List(CoreAttrs), String url, String alternate, Int32 width, Int32 height), any_table (List(Table_Option), HTML_Header_Row($T), List(HTML_Row($T)), HTML_Footer_Row($T)), any_center ($T), any_mail_to (String email, $T element), @@ -3759,10 +3767,10 @@ define Printable_tree //["
",s,""], any_paragraph(opts,e) then ["
",format_element(e),"
\n"], - any_image(url) then - ["