review.tizen.org Git - platform/upstream/perl.git/commit

author	Father Chrysostomos <sprout@cpan.org>
	Sat, 16 Nov 2013 05:40:45 +0000 (21:40 -0800)
committer	Father Chrysostomos <sprout@cpan.org>
	Sat, 16 Nov 2013 05:40:45 +0000 (21:40 -0800)
commit	bfe1187367fb54e8ac3a13703b06f6119d6bc035
tree	55acb260b0f1c415100473ff592de207658c977a	tree \| snapshot
parent	87444db5c36797b47b49fc8b6f4cfd9453186734	commit \| diff

Unwrap a perldiag entry for better splain output

Before:

$ ./perl -Ilib -Mdiagnostics -e 'warn "Missing '\'']'\'' in prototype for %s : %s"'
Missing ']' in prototype for %s : %s at -e line 1 (#1)
    (W illegalproto) A grouping was started with [ but never closed with
    ].

After:

$ ./perl -Ilib -Mdiagnostics -e 'warn "Missing '\'']'\'' in prototype for %s : %s"'
Missing ']' in prototype for %s : %s at -e line 1 (#1)
    (W illegalproto) A grouping was started with [ but never closed with ].