From 63db7af11265967d0111c8224aa07c040fb438b9 Mon Sep 17 00:00:00 2001
From: Jacob Pipkin <j@dawnrazor.net>
Date: Mon, 5 Nov 2012 03:21:13 -0600
Subject: git rid of prototype for get_distfile. all tests pass.

---
 SBO-Lib/lib/SBO/Lib.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(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 07e3975..b6acd49 100644
--- a/SBO-Lib/lib/SBO/Lib.pm
+++ b/SBO-Lib/lib/SBO/Lib.pm
@@ -406,7 +406,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 ($$) {
+sub get_distfile {
 	exists $_[1] or script_error 'get_distfile requires an argument';
 	my ($link, $info_md5) = @_;
 	my $filename = get_filename_from_link $link;
@@ -489,7 +489,7 @@ sub check_distfiles (%) {
 	exists $_[0] or script_error 'check_distfiles requires an argument.';
 	my %dists = @_;
 	while (my ($link, $md5) = each %dists) {
-		get_distfile $link, $md5 unless verify_distfile ($link, $md5)
+		get_distfile ($link, $md5) unless verify_distfile ($link, $md5);
 	}
 	return 1;
 }
-- 
cgit v1.2.3