From 92f2b024a4a59e820ca379c002b15f827476cdbc Mon Sep 17 00:00:00 2001
From: Guillaume Rousse <guillomovitch@mageia.org>
Date: Thu, 24 May 2012 16:45:10 +0000
Subject: factorize conversion

---
 t/test.t | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/t/test.t b/t/test.t
index eba3ed7..37e9bae 100644
--- a/t/test.t
+++ b/t/test.t
@@ -14,7 +14,7 @@ use Test::More;
 my %tests = (
     sample1 => [
         [
-            binary('00ffffffffffff0006af14a10000000001120103901a10780a50c59858528e2725505400000001010101010101010101010101010101ea1a007e502010303020360005a31000001aea1a007e502010303020360005a31000001a000000fe00593734374480423132314557300000000000000000000000000001010a202000a5')
+            '00ffffffffffff0006af14a10000000001120103901a10780a50c59858528e2725505400000001010101010101010101010101010101ea1a007e502010303020360005a31000001aea1a007e502010303020360005a31000001a000000fe00593734374480423132314557300000000000000000000000000001010a202000a5'
         ],
         [ 
             [
@@ -117,8 +117,8 @@ my %tests = (
     ], 
     sample2 => [
         [
-            binary('00ffffffffffff0006af14a10000000001120103901a10780a50c59858528e2725505400000001010101010101010101010101010101ea1a007e502010303020360005a31000001aea1a007e502010303020360005a31000001a000000fe00593734374480423132314557300000000000000000000000000001010a202000a5'),
-            binary('00ffffffffffff0022f0f62601010101181401036e362378eece50a3544c99260f5054a56b8081408180a900a940b300d10001010101283c80a070b023403020360022602100001a000000fc004850204c5032343735770a2020000000fd0030551e5e15000a202020202020000000ff00434e43303234303343500a20200085')
+            '00ffffffffffff0006af14a10000000001120103901a10780a50c59858528e2725505400000001010101010101010101010101010101ea1a007e502010303020360005a31000001aea1a007e502010303020360005a31000001a000000fe00593734374480423132314557300000000000000000000000000001010a202000a5',
+            '00ffffffffffff0022f0f62601010101181401036e362378eece50a3544c99260f5054a56b8081408180a900a940b300d10001010101283c80a070b023403020360022602100001a000000fc004850204c5032343735770a2020000000fd0030551e5e15000a202020202020000000ff00434e43303234303343500a20200085'
         ],
         [
             [
@@ -403,7 +403,7 @@ foreach my $test (keys %tests) {
     my @edids = find_edid_in_string($string);
     is_deeply(
         \@edids,
-        $tests{$test}->[0],
+        [ map { binary($_) } @{$tests{$test}->[0]} ],
         "file $test: edids extraction"
     );
 
-- 
cgit v1.2.1