From 52634f44d093b64753aaa0f5fb3ecbc2024becf4 Mon Sep 17 00:00:00 2001
From: David RENE <totoro@calexium.com>
Date: Mon, 27 Aug 2012 21:26:42 +0000
Subject: [PATCH] Remove useless normalize which became identity (this mean that the function always return incoming parameter). So normalize was no effect

---
 calexium_lib/web/CXM_making_a_web_site.anubis | 24 ++++--------------------
 1 file changed, 4 insertions(+), 20 deletions(-)

diff --git a/calexium_lib/web/CXM_making_a_web_site.anubis b/calexium_lib/web/CXM_making_a_web_site.anubis
index 3df0cd8..b45da72 100644
--- a/calexium_lib/web/CXM_making_a_web_site.anubis
+++ b/calexium_lib/web/CXM_making_a_web_site.anubis
@@ -3522,24 +3522,8 @@ define String
             }
          + format(t)
      }.
-   
-   
-   Normalizing a list of cell options  (horizontal position must be specified; the default
-   is 'left').
-   
-define List(Cell_Option)
-   normalize
-     (
-       List(Cell_Option)   l
-     ) =
-   if member(l,left)      then l else
-   if member(l,h_center)  then l else
-   if member(l,right)     then l else
-   //[left . l]. CR: why ? there is no default because we can use CSS
-   l.
-   
-   
-   Formating cells in a row. 
+ 
+ Formating cells in a row.
    
 define Printable_tree
    format
@@ -3551,7 +3535,7 @@ define Printable_tree
      {
        [ ] then [ ], 
        [h . t] then if h is cell(options,element) then 
-         ["<td",format(reverse(normalize(options))),">",
+         ["<td",format(reverse(options)),">",
             format_element(element), 
           "</td>" 
           . format(t,format_element)]
@@ -3567,7 +3551,7 @@ define Printable_tree
      {
        [ ] then [ ], 
        [h . t] then if h is header_cell(options,element) then 
-         ["<th ",format(reverse(normalize(options))),">",
+         ["<th ",format(reverse(options)),">",
             format_element(element), 
           "</th>" 
           . format(t,format_element)]
--
libgit2 0.21.4