diff options
| author | B. Watson <urchlay@slackware.uk> | 2026-10-20 06:06:36 -0400 |
|---|---|---|
| committer | B. Watson <urchlay@slackware.uk> | 2026-10-20 06:06:36 -0400 |
| commit | 5d4d0f28ced2c4cd7f4354458b279a25612753a2 (patch) | |
| tree | 66df5dead942400ed766f7aebb44a8cdabb31ac6 | |
| parent | 85f6672a93c2598067635329d3894b976f359221 (diff) | |
| download | greypool-5d4d0f28ced2c4cd7f4354458b279a25612753a2.tar.gz | |
Better error detection for mask.
| -rwxr-xr-x | greypool | 4 |
1 files changed, 3 insertions, 1 deletions
@@ -302,7 +302,9 @@ sub parse_transform { my $junk; ($pkg, $subst, $junk) = split /\s+/, $_[0]; - fatal "$config_file:$.: trailing junk on transform line" if $junk; + if(defined $junk || !defined $subst || !defined $pkg) { + fatal "$config_file:$.: transform requires exactly 2 arguments"; + } eval 'my $i = ""; $i =~ ' . $subst . ';'; if($@) { |
