Put license in doc. More code cleanup.

1 files changed, 12 insertions, 19 deletions

diff --git a/genhdlist b/genhdlist
index bbfaa6d..44a7a4d 100644
--- a/genhdlist
+++ b/genhdlist
@@ -2,22 +2,6 @@
 
 (our $VERSION) = q$Id$ =~ /(\d+\.\d+)/;
 
-#- Copyright (C) 1999-2005 Mandrakesoft
-#-
-#- This program is free software; you can redistribute it and/or modify
-#- it under the terms of the GNU General Public License as published by
-#- the Free Software Foundation; either version 2, or (at your option)
-#- any later version.
-#-
-#- This program is distributed in the hope that it will be useful,
-#- but WITHOUT ANY WARRANTY; without even the implied warranty of
-#- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-#- GNU General Public License for more details.
-#-
-#- You should have received a copy of the GNU General Public License
-#- along with this program; if not, write to the Free Software
-#- Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
-
 use strict;
 use URPM;
 use URPM::Build;
@@ -26,7 +10,7 @@ use File::Path;
 use Getopt::Long;
 use Pod::Usage;
 
-my ($noclean, $nooutput, $nobadrpm, $md5sum, $subdir, $suffix, $dest) = (0, 0, 0, 0, "", "", "");
+my ($nooutput, $nobadrpm, $md5sum, $subdir, $suffix, $dest) = (0, 0, 0, "", "", "");
 my $tmpdir = (-d "$ENV{HOME}/tmp" ? "$ENV{HOME}/tmp" : $ENV{TMPDIR} || "/tmp") . "/.build_hdlist";
 
 sub usage () {
@@ -39,7 +23,7 @@ GetOptions(
     'help|h' => sub { usage(); exit 0 },
     list => \my $list,
     nobadrpm => \$nobadrpm,
-    noclean => \$noclean,
+    noclean => \my $noclean,
     md5sum => \$md5sum,
     s => \$nooutput,
     'subdir=s' => \$subdir,
@@ -211,7 +195,7 @@ F</tmp/.build_hdlist>.
 
 =head1 SEE ALSO
 
-gendistrib(1)
+gendistrib(1), parsehdlist(1)
 
 =head1 COPYRIGHT
 
@@ -222,4 +206,13 @@ it under the terms of the GNU General Public License as published by
 the Free Software Foundation; either version 2, or (at your option)
 any later version.
 
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program; if not, write to the Free Software
+Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+
 =cut