From: Kim Nguyễn <kn@lri.fr>
Date: Wed, 22 Feb 2012 09:17:56 +0000 (+0100)
Subject: Fix indentation issues.
X-Git-Url: http://git.nguyen.vg/gitweb/?a=commitdiff_plain;h=3878364d77115ce1ed2839cc631a9f73001bc438;p=SXSI%2Fxpathcomp.git

Fix indentation issues.
---

diff --git a/src/tree.ml b/src/tree.ml
index e1374a7..587e649 100644
--- a/src/tree.ml
+++ b/src/tree.ml
@@ -35,11 +35,11 @@ let tag t = (); fun s ->
 
 let to_string d = ();
   fun t ->
-  if t == Tag.pcdata then "<$>"
-  else if t == Tag.attribute_data then "<@$>"
-  else if t == Tag.attribute then "<@>"
-  else if t == Tag.nullt then "<!NIL!>"
-  else tag_name d t
+    if t == Tag.pcdata then "<$>"
+    else if t == Tag.attribute_data then "<@$>"
+    else if t == Tag.attribute then "<@>"
+    else if t == Tag.nullt then "<!NIL!>"
+    else tag_name d t
 
 let translate  x = x