--- builds_bin/update_rpms_dir 2006/02/12 05:06:41 1.9 +++ builds_bin/update_rpms_dir 2006/02/14 04:08:46 1.10 @@ -4,7 +4,7 @@ # is free software; you can redistribute it and/or modify it under the # same terms as Perl itself. # -# $Id: update_rpms_dir,v 1.8 2006/02/12 05:01:05 gordonr Exp $ +# $Id: update_rpms_dir,v 1.9 2006/02/12 05:06:41 gordonr Exp $ # # Update RPMS directory with the latest from a given list of directories @@ -45,7 +45,7 @@ for my $file ( sort grep { /.rpm$/ } rea if ($newest) { # XXX - FIXME - Should we try other repos, or stop here? - warn "rm $rpms_dir/$file; cp -p $dir/$newest $rpms_dir\n" + print "rm $rpms_dir/$file; cp -p $dir/$newest $rpms_dir\n" } } }