File help-param-513476.patch of Package whohas

--- program/whohas.orig	2011-11-27 23:06:44.000000000 +0200
+++ program/whohas	2011-12-04 20:07:30.796085749 +0200
@@ -71,12 +71,19 @@
 my @distroSelections;
 my $nothreads;
 my $shallow;
+my $option_help;
 GetOptions(
 	"d=s" => \@distroSelections,
 	"no-threads" => \$nothreads,
-	"shallow" => \$shallow
+	"shallow" => \$shallow,
+	"help|usage|h" => \$option_help
 );
 
+if ($option_help) {
+	print "Usage: $0 [--no-threads] [--shallow] [-d Dist1[,Dist2[,Dist3...]]] pkgname\n";
+	exit 0;
+}
+
 if (@ARGV > 1) {
 	die "Error:\tToo many parameters. Usage: $0 [--no-threads] [--shallow] [-d Dist1[,Dist2[,Dist3...]]] pkgname\n";
 } elsif (@ARGV < 1) {