get rid of prototype for ask_user_group, all tests pass

2 files changed, 5 insertions, 5 deletions

diff --git a/sboupgrade b/sboupgrade
index 87c9fce..7a5502d 100755
--- a/sboupgrade
+++ b/sboupgrade
@@ -145,7 +145,7 @@ sub clean_reqs ($) {
 }
 
 # ask to install any requirements found
-sub ask_requires (%) {
+sub ask_requires {
 	my %args = (
 		REQUIRES	=> '',
 		README		=> '',
@@ -187,7 +187,7 @@ sub get_user_group ($) {
 }
 
 # offer to run any user/group add commands
-sub ask_user_group ($$) {
+sub ask_user_group {
 	exists $_[1] or script_error 'ask_user_group requires two arguments';
 	my ($cmds, $readme) = @_;
 	say "\n". $readme;
@@ -248,7 +248,7 @@ sub readme_prompt ($$) {
 		ref $requires eq 'ARRAY';
 	# check for user/group add commands, offer to run any found
 	my $user_group = get_user_group $readme;
-	ask_user_group $user_group, $readme  if $$user_group[0];
+	ask_user_group ($user_group, $readme)  if $$user_group[0];
 	# check for options mentioned in the README
 	my $opts;
 	$opts = ask_opts $readme if get_opts $readme;
diff --git a/sboupgradex b/sboupgradex
index 83128e1..c20774b 100644
--- a/sboupgradex
+++ b/sboupgradex
@@ -107,7 +107,7 @@ sub get_user_group ($) {
 }
 
 # offer to run any user/group add commands
-sub ask_user_group ($$) {
+sub ask_user_group {
     exists $_[1] or script_error 'ask_user_group requires two arguments';
     my ($cmds, $readme) = @_;
     say "\n". $readme;
@@ -165,7 +165,7 @@ sub user_prompt ($$) {
 
         # check for user/group add commands, offer to run any found
         my $user_group = get_user_group $readme;
-        ask_user_group $user_group, $readme  if $$user_group[0];
+        ask_user_group ($user_group, $readme)  if $$user_group[0];
 
         # check for options mentioned in the README
         my $opts = 0;