From 13b184a21e6ede64a9cf16f20dd774ea8cd45c4f Mon Sep 17 00:00:00 2001 From: Steven Schubiger Date: Tue, 1 Aug 2017 21:55:21 +0200 Subject: Enhance message if attribute is invalid --- t/fail.t | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 't') diff --git a/t/fail.t b/t/fail.t index daf1867..e2d71be 100755 --- a/t/fail.t +++ b/t/fail.t @@ -12,7 +12,7 @@ use IPC::Open3 qw(open3); use Symbol qw(gensym); use Test::More; -my $tests = 24; +my $tests = 25; my $run_program_fail = sub { @@ -42,7 +42,8 @@ SKIP: { my @set = ( [ '--attr=:', 'must be provided a string' ], [ '--attr=bold:underscore', 'must have strings separated by ,' ], - [ '--attr=b0ld', 'must be provided valid attribute names' ], + [ '--attr=b0ld', 'attribute \'b0ld\' is not valid' ], + [ '--attr=b0ld,underscore', 'attribute \'b0ld\' is not valid' ], # NULify comma [ '--attr=bold,bold', 'has attribute \'bold\' twice or more' ], [ '--exclude-random=random', 'must be provided a plain color' ], [ '--clean --clean-all', 'mutually exclusive' ], -- cgit v1.2.3