From 446aa59e3c96cdbac09248024d462d50c9c303b2 Mon Sep 17 00:00:00 2001 From: Andreas Guldstrand Date: Thu, 19 Nov 2015 14:15:12 +0100 Subject: get_distfile needs 2 arguments, checks for 2 arguments, but error message was about 1 --- SBO-Lib/lib/SBO/Lib.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'SBO-Lib/lib/SBO/Lib.pm') diff --git a/SBO-Lib/lib/SBO/Lib.pm b/SBO-Lib/lib/SBO/Lib.pm index 358ea15..7eba745 100644 --- a/SBO-Lib/lib/SBO/Lib.pm +++ b/SBO-Lib/lib/SBO/Lib.pm @@ -504,7 +504,7 @@ sub verify_distfile { # for a given distfile, attempt to retrieve it and, if successful, check its # md5sum against that in the sbo's .info file sub get_distfile { - exists $_[1] or script_error('get_distfile requires an argument'); + exists $_[1] or script_error('get_distfile requires two arguments'); my ($link, $info_md5) = @_; my $filename = get_filename_from_link($link); mkdir $distfiles unless -d $distfiles; -- cgit v1.2.3