Adjust whitespace

aantron · Dec 25, 2017 · d2905e3 · d2905e3
1 parent 0479c16
commit d2905e3
Show file tree

Hide file tree

Showing 3 changed files with 10 additions and 4 deletions.
diff --git a/src/encoding.ml b/src/encoding.ml
@@ -276,7 +276,7 @@ let ebcdic_37_table = [|
 
 let ebcdic : t = code_page ebcdic_37_table
 
-let iso_8859_15_table= [|
+let iso_8859_15_table = [|
     (* ASCII *)
     0x0000; 0x0001; 0x0002; 0x0003; 0x0004; 0x0005; 0x0006; 0x0007;
     0x0008; 0x0009; 0x000A; 0x000B; 0x000C; 0x000D; 0x000E; 0x000F;

diff --git a/test/test_detect.ml b/test/test_detect.ml
@@ -108,7 +108,9 @@ let tests = [
       (Some "shift_jis");
     check "<meta http-equiv='content-type' content='charset=shift_jis foo'>"
       (Some "shift_jis");
-    check "<meta http-equiv='content-type' content='text/html' charset='iso-8859-15'>"
+    check
+      ("<meta http-equiv='content-type' content='text/html' " ^
+       "charset='iso-8859-15'>")
       (Some "iso-8859-15");
     check "<meta http-equiv='content-type' content='charset=\"\"'>" None;
     check "<meta>" None;

diff --git a/test/test_integration.ml b/test/test_integration.ml
@@ -38,14 +38,18 @@ let tests = [
        "<p><em>bar</em></p></body></html>"));
 
   ("integration.html.encoding" >:: fun _ ->
-    "<!DOCTYPE html><html><head><meta http-equiv='content-type' content='text/html' charset='iso-8859-15'></head><body><p><em>\xA0\xA4foo<p>bar"
+    ("<!DOCTYPE html><html><head><meta http-equiv='content-type' " ^
+     "content='text/html' charset='iso-8859-15'></head>" ^
+     "<body><p><em>\xA0\xA4foo<p>bar")
     |> string
     |> parse_html
     |> signals
     |> write_html
     |> to_string
     |> assert_equal
-      ("<!DOCTYPE html><html><head><meta http-equiv=\"content-type\" content=\"text/html\" charset=\"iso-8859-15\"></head><body><p><em>&nbsp;\xE2\x82\xACfoo</em></p>" ^
+      ("<!DOCTYPE html><html><head><meta http-equiv=\"content-type\" " ^
+       "content=\"text/html\" charset=\"iso-8859-15\"></head>" ^
+       "<body><p><em>&nbsp;\xE2\x82\xACfoo</em></p>" ^
        "<p><em>bar</em></p></body></html>"));
 
   ("integration.html.context-disambiguation" >:: fun _ ->