X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fsugar.t;h=2ccc009038df9cd87306cedb3fc5028b5ec09ca7;hb=0d51197846c3fe198ef94aa255efbbad77432d02;hp=20eb013115a381740c5cdfb2fc8de98155eb19f9;hpb=2566c738d28b5c6fd48615bd8a7a297d3e92cffd;p=p5sagit%2FData-Dumper-Concise.git

diff --git a/t/sugar.t b/t/sugar.t
index 20eb013..2ccc009 100644
--- a/t/sugar.t
+++ b/t/sugar.t
@@ -34,7 +34,7 @@ DWARN: {
    ok eq_array(\@foo, ['warn','friend']), 'Dwarn passes lists through correctly';
 
    my $bar = Dwarn 'robot',2,3;
-   is $warned_string,qq{"robot"\n}, 'Dwarn warns scalars correctly';
+   is $warned_string,qq{"robot"\n2\n3\n}, 'Dwarn warns scalars correctly';
    is $bar, 'robot', 'Dwarn passes scalars through correctly';
 }