Prototype of sub may lead to confusion and is not recommended.
my $scratch_dir = "$build_root/local/scratch.$arch";
-sub mkdir_p($) {
+sub mkdir_p {
my $path = shift;
my $err_msg;
# attempt a 'mkdir -p' on the provided path and catch any errors returned
/^.*\.spec\z/s && fill_packs_from_obs($name);
}
-sub fill_packs_from_obs() {
+sub fill_packs_from_obs {
my $name = shift;
$name =~ m/\.osc/ || push(@packs, $name);
}
return undef;
}
-sub update_pkgdeps()
+sub update_pkgdeps
{
@tmp_expansion_errors = ();
foreach my $name (keys %to_build) {