X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=bin%2Flocal-debbugs;h=25c47c9300671f9e9a7a8e332627d898252c0840;hb=5bebdf8f3881f3347399c3cd14ed659e0523ed5c;hp=acdfa2eb6b47e90877a4dfa48cf3d5a339ec718a;hpb=02e70ed5c05c0ed436e2f6e51ea2122e8fc0d9d8;p=debbugs.git diff --git a/bin/local-debbugs b/bin/local-debbugs index acdfa2e..25c47c9 100755 --- a/bin/local-debbugs +++ b/bin/local-debbugs @@ -39,19 +39,19 @@ Update the local mirror of debbugs bugs =item B<--daemon, -D> Start up the daemon on the configured local port to serve bugs which -have been previously retried +have been previously retrieved. =item B<--search, -S> Cause the running daemon to show the pkgreport.cgi page corresponding -to the search by invoking sensible-browser and an appropriate url +to the search by invoking sensible-browser and an appropriate url. =item B<--show, -s> Cause the running daemon to show the bugreport.cgi page corresponding -to the bug by invoking sensible-browser and an appropriate url +to the bug by invoking sensible-browser and an appropriate url. -=item B<--port,-p> +=item B<--port, -p> The port that the daemon is running on (or will be running on.) @@ -65,7 +65,7 @@ Defaults to ~/.debbugs/bugs_to_get =item B<--bug-site> -Hostname for a site which is running a debbugs install +Hostname for a site which is running a debbugs install. Defaults to bugs.debian.org =item B<--bug-mirror> @@ -76,7 +76,7 @@ Defaults to bugs-mirror.debian.org =item B<--debug, -d> -Debug verbosity. (Default 0) +Debug verbosity. =item B<--help, -h> @@ -90,6 +90,21 @@ Display this manual. =head1 EXAMPLES +=over + +=item Update the local mirror + + local-debbugs --mirror + +=item Start up the local-debbugs daemon + + local-debbugs --daemon + +=item Search for bugs with severity serious + + local-debbugs --search severity:serious + +=back =cut @@ -359,7 +374,7 @@ elsif ($options{search}) { my $pid = checkpid($options{mirror_location}.'/local-debbugs.pid'); if (not defined $pid or $pid == 0) { print STDERR "Unable to open pidfile or daemon not running: $!\n"; - print STDERR qq(Mr. T: "I pity da fool who tries to show a bug without a running daemon"\n); + print STDERR qq(Mr. T: "I pity da fool who tries to search for bugs without a running daemon"\n); print STDERR "Hint: try the --daemon option first\n"; exit 1; } @@ -423,9 +438,8 @@ sub run_rsync{ ); my ($output,$error) = ('',''); my $h = IPC::Run::start(['rsync',@{$param{options}}], - \undef,\$output,\$error); + \undef,$param{log},$param{log}); while ($h->pump) { - print {$param{log}} $output,$error; #print {$param{debug}} $error if defined $param{debug}; } $h->finish();