From c58fb7b5991e30b542f3dd80cf7b1d337cb63023 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 19 Aug 2009 08:55:12 +0000 Subject: (mountpoint_credentials_save) make it parseable by perl_checker, thus fixing the build --- perl-install/fs/remote/davfs.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/fs/remote/davfs.pm b/perl-install/fs/remote/davfs.pm index 5ba3e84f0..5df0fe771 100644 --- a/perl-install/fs/remote/davfs.pm +++ b/perl-install/fs/remote/davfs.pm @@ -38,7 +38,7 @@ sub mountpoint_credentials_save { my @var = split(/=/); $h{$var[0]} = $var[1]; } - foreach my $key qw(username password) { + foreach my $key (qw(username password)) { $entry->{$key} = $h{$key}; } save_credentials(\@entries); -- cgit v1.2.1