From 7527c2c5ea67ae0c24f176ccba68a8d97df6254d Mon Sep 17 00:00:00 2001 From: David RENE Date: Thu, 28 Aug 2008 16:30:48 +0000 Subject: [PATCH] fix to be compliant with anubis 1.9.1.0 --- MF_1_1/net_services/CXM_net_services.anubis | 2 +- MF_1_1/web/CXM_http_get_common.anubis | 2 +- MF_1_1/web/CXM_making_a_web_site.anubis | 10 +++++----- 3 files changed, 7 insertions(+), 7 deletions(-) diff --git a/MF_1_1/net_services/CXM_net_services.anubis b/MF_1_1/net_services/CXM_net_services.anubis index 144faf4..c6133be 100644 --- a/MF_1_1/net_services/CXM_net_services.anubis +++ b/MF_1_1/net_services/CXM_net_services.anubis @@ -49,7 +49,7 @@ define Maybe(NetService) if services_list is { [] then failure, - [h.t] then + [h . t] then if h.id = service_id & h.version >=+ service_version then success(h) else diff --git a/MF_1_1/web/CXM_http_get_common.anubis b/MF_1_1/web/CXM_http_get_common.anubis index 7c3ba5d..3ed0006 100644 --- a/MF_1_1/web/CXM_http_get_common.anubis +++ b/MF_1_1/web/CXM_http_get_common.anubis @@ -56,7 +56,7 @@ public define String if t is { [ ] then if h is http_argument(n,v) then n + "=" + v, - [_._] then if h is http_argument(n,v) then n + "=" + v + "&" + format_http_args(t) + [_ . _] then if h is http_argument(n,v) then n + "=" + v + "&" + format_http_args(t) } }. diff --git a/MF_1_1/web/CXM_making_a_web_site.anubis b/MF_1_1/web/CXM_making_a_web_site.anubis index 7cf0e5f..26c6c9a 100644 --- a/MF_1_1/web/CXM_making_a_web_site.anubis +++ b/MF_1_1/web/CXM_making_a_web_site.anubis @@ -2994,7 +2994,7 @@ public define String if attributs is { [] then "", - [h .t] then + [h . t] then with current = if h is { id(id_name) then @@ -3038,7 +3038,7 @@ define String if attributs is { [] then "", - [h .t] then + [h . t] then with current = if h is { class(class_name) then @@ -3083,13 +3083,13 @@ define String if text_options is { [] then "", - [_._] then " style=\"" + format(text_options) + "\" " + [_ . _] then " style=\"" + format(text_options) + "\" " } + if css_classes is { [] then "", - [_._] then format_attrs(css_classes) + [_ . _] then format_attrs(css_classes) }. //define String @@ -4222,7 +4222,7 @@ define Printable_tree if css_styles is { [] then [], - [_._] then [ "\n" ] -- libgit2 0.21.4