fix to be compliant with anubis 1.9.1.0

David RENE
1 parent 9ca943bd
Showing 3 changed files with 7 additions and 7 deletions Show diff stats
MF_1_1/net_services/CXM_net_services.anubis
MF_1_1/web/CXM_http_get_common.anubis
MF_1_1/web/CXM_making_a_web_site.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
@@ -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)
           }
     }.
@@ -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 [ "<style type=\"text/css\"><!--\n",
+    [_ . _] then [ "<style type=\"text/css\"><!--\n",
                   format_css_styles(css_styles), 
                  "  --></style>\n"
                ]