diff --git a/calexium_lib/web/CXM_making_a_web_site.anubis b/calexium_lib/web/CXM_making_a_web_site.anubis
index d1a89ed..4b4ff12 100644
--- a/calexium_lib/web/CXM_making_a_web_site.anubis
+++ b/calexium_lib/web/CXM_making_a_web_site.anubis
@@ -875,6 +875,7 @@ public type HTML_In_Form:
actioner (Actioner_Connection, Actioner_Target, Actioner_Aspect,
String action_name, List((String,String)) extra_ops,
List(Actioner_Local_Action)),
+ foreign_link (List(Text_Option), String url),
foreign_link (List(Text_Option), String url, String name),
private_download (String abs_path, String name, String extra_ext,
Maybe((String,List((String,String)))) action),
@@ -1009,6 +1010,7 @@ public type HTML_Off_Form:
actioner (Actioner_Connection, Actioner_Target, Actioner_Aspect,
String action_name, List((String,String)) extra_ops,
List(Actioner_Local_Action), String form_name),
+ foreign_link (List(Text_Option), String url),
foreign_link (List(Text_Option), String url, String name),
private_download (String abs_path, String name, String extra_ext,
Maybe((String,List((String,String)))) action),
@@ -2231,6 +2233,7 @@ type HTML_Any($T):
List((String,String)) extra_ops,
List(Actioner_Local_Action),
Maybe(String) form_name),
+ any_foreign_link (List(Text_Option), String url),
any_foreign_link (List(Text_Option), String url, String name),
any_private_download (String abs_path, String name, String extra_ext,
Maybe((String,List((String,String))))),
@@ -3428,6 +3431,8 @@ define Printable_tree
""],
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(options,url) then
+ [""],
any_foreign_link(options,url,name) then
["",name,""],
any_private_download(url,name,extra_ext,action) then
@@ -3486,6 +3491,8 @@ define Printable_tree
format(cinfo,sn,ic_v,any_scroller(w,h,cw,ch,c),format_element,is_https),
actioner(c,t,a,an,eo,ja) then
format(cinfo,sn,ic_v,any_actioner(c,t,a,an,eo,ja,success(fn)),format_element,is_https),
+ foreign_link(options,url) then
+ format(cinfo,sn,ic_v,any_foreign_link(options,url),format_element,is_https),
foreign_link(options,url,name) then
format(cinfo,sn,ic_v,any_foreign_link(options,url,name),format_element,is_https),
private_download(url,name,extra,action) then
@@ -3571,6 +3578,7 @@ define Bool
mail_to(m,e) then false, // 'e' may but should not contain an upload
scroller(w,h,cw,ch,e) then contains_an_upload(e),
actioner(c,t,a,an,eo,ja) then false,
+ foreign_link(o,u) then false,
foreign_link(o,u,n) then false,
private_download(p,n,e,a) then false,
text_input(lt,l,n,i,w) then false,
@@ -3641,6 +3649,8 @@ define Printable_tree
format(cinfo,sn,ic_v,any_actioner(c,t,a,an,eo,ja,failure),format_element,is_https),
actioner(c,t,a,an,eo,ja,fn) then
format(cinfo,sn,ic_v,any_actioner(c,t,a,an,eo,ja,success(fn)),format_element,is_https),
+ foreign_link(options,url) then
+ format(cinfo,sn,ic_v,any_foreign_link(options,url),format_element,is_https),
foreign_link(options,url,name) then
format(cinfo,sn,ic_v,any_foreign_link(options,url,name),format_element,is_https),
private_download(url,name,extra,action) then
--
libgit2 0.21.4