Add TODO test for implicit lineto after M command.

benkasminbullock · Dec 6, 2013 · 0cfdcc8 · 0cfdcc8
1 parent 44918fe
commit 0cfdcc8
Showing 1 changed file with 11 additions and 0 deletions.
diff --git a/t/Image-SVG-Path.t b/t/Image-SVG-Path.t
@@ -37,6 +37,17 @@ eval {
 };
 ok (! $@, "parse exponential");
 
+TODO: {
+    local $TODO = 'implicit moveto/lineto combis';
+    my $implicit = 'M 0,0 -1.733,-6.165';
+    my @implicit_info;
+    eval {
+	@implicit_info = extract_path_info ($implicit);
+    };
+    ok (! $@, "parse implicit OK");
+    is ($implicit_info[1]{type}, 'line-to', "Got lineto from implicit");
+}
+
 done_testing ();
 exit;