does not respect git pull's quiet mode

[anarcat]

$ git pull --quiet
Searching revisions...
Last local mediawiki revision found is 5409, fetching from here.
Fetching & writing export data by revs...
Listing pages on remote wiki...
504 pages found.

Excerpt from git-pull(1):

       -q, --quiet
           This is passed to both underlying git-fetch to squelch reporting
           of during transfer, and underlying git-merge to squelch output
           during merging.

Therefore, this remote should respect -q.

[anarcat]

i found out this is an "option" sent by git to the "helpers" such as us. this is documented in the OPTIONS section of the documentation, as the "verbosity" option.

something like this:

diff --git a/contrib/mw-to-git/git-remote-mediawiki.perl b/contrib/mw-to-git/git-remote-mediawiki.perl
index e7f857c1a..de7d6a27f 100755
--- a/contrib/mw-to-git/git-remote-mediawiki.perl
+++ b/contrib/mw-to-git/git-remote-mediawiki.perl
@@ -595,6 +595,7 @@ sub mw_capabilities {
        print {*STDOUT} "import\n";
        print {*STDOUT} "list\n";
        print {*STDOUT} "push\n";
+       print {*STDOUT} "option\n";
        if ($dumb_push) {
                print {*STDOUT} "no-private-update\n";
        }
@@ -612,8 +613,15 @@ sub mw_list {
 }
 
 sub mw_option {
-       print {*STDERR} "remote-helper command 'option $_[0]' not yet implemented\n";
-       print {*STDOUT} "unsupported\n";
+       my $option = shift;
+       my $value = shift;
+       if ($option eq "verbosity") {
+               $verbosity = $value;
+               print {*STDOUT} "ok\n"
+       } else {
+               print {*STDERR} "remote-helper command 'option $option' not yet implemented\n";
+               print {*STDOUT} "unsupported\n";
+       }
        return;
 }
 

then we need to figure out how to do multi-level log output in perl. i asked the git mailing list to see if they had a clue, because i've been told to fix this two times there already... :p