Added test for processing unknown type

ivanwills · Jul 23, 2017 · 975c713 · 975c713
1 parent 32b413b
commit 975c713
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/t/options.t b/t/options.t
@@ -89,4 +89,10 @@ sub option_process {
 
     ($value, $used) = $three->process('', 'T', 'test', []);
     is $value, 'test', '--short again sets value to test';
+
+    $three->{type} = 'Other';
+    eval { $three->process('', 'T', 'O', []) };
+    $error = $@;
+    ok $error, 'Get an error';
+    like $error, qr/^Unknown type 'Other'\n/, 'Error on unknown types';
 }