exit on print

This commit is contained in:
Troy Will 2009-04-20 12:06:07 -07:00
parent a3d3db4ad4
commit 3ecd142817

View file

@ -21,9 +21,11 @@ my $dbh = DBI->connect("dbi:SQLite:$database", "", "", {RaiseError => 1, AutoCom
&populate_gnu_software($dbh); &populate_gnu_software($dbh);
&print_mirrors; &print_mirrors;
&print_software; &print_software;
exit if $ARGV[0] eq 'print';
#&stow_gnu_software('make'); #&stow_gnu_software('make');
#&stow_gnu_software('mdk'); #&stow_gnu_software('mdk');
&stow_gnu_software('gmp'); #&stow_gnu_software('gmp');
#&stow_gnu_software('gcc'); #&stow_gnu_software('gcc');
################################################ Subroutines only below this line ############################ ################################################ Subroutines only below this line ############################