From 144119302f59ba2cf92c4d15d34cae858ca4ca24 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 20 Oct 2003 15:20:45 +0000 Subject: print more understandable error message on parse error --- perl-install/standalone/drakperm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/standalone/drakperm b/perl-install/standalone/drakperm index 7a19992d3..16d47ea31 100755 --- a/perl-install/standalone/drakperm +++ b/perl-install/standalone/drakperm @@ -224,7 +224,7 @@ sub load_perms() { } elsif (m/^(\S+)\s+current?\s+(\d+)/) { push @rules, { if_($is_uneditable, editable => $pixbuf), path => $1, user => 'current', group => '', perms => $2, index => $index }; } else { - warn "unparsed \"$_\"line"; + warn "unparsable \"$_\"line"; } $index++; } -- cgit v1.2.1