Re: [PATCH] git-remote-mediawiki: use Git.pm functions for credentials

2013-06-05 Thread Jeff King
On Wed, Jun 05, 2013 at 12:58:00PM +0200, benoit.per...@ensimag.fr wrote:

 From: Benoit Person benoit.per...@ensimag.fr
 
 In 52dce6d, a new credential function was added to Git.pm, based on
 git-remote-mediawiki's functions. The logical follow-up is to use
 those functions in git-remote-mediawiki.
 
 Signed-off-by: Benoit Person benoit.per...@ensimag.fr
 Signed-off-by: Matthieu Moy matthieu@grenoble-inp.fr

Thanks, this looks correct to me.

-Peff
--
To unsubscribe from this list: send the line unsubscribe git in
the body of a message to majord...@vger.kernel.org
More majordomo info at  http://vger.kernel.org/majordomo-info.html


Re: [PATCH] git-remote-mediawiki: use git.pm functions for credentials

2013-06-04 Thread Junio C Hamano
benoit.per...@gmail.com writes:

 From: Benoit Person benoit.per...@ensimag.fr

 In 52dce6d, a new credential function was added to git.pm, based on
 git-remote-mediawiki's functions. The logical follow-up is to use
 those functions in git-remote-mediawiki.

 Signed-off-by: Benoit Person benoit.per...@ensimag.fr
 Signed-off-by: Matthieu Moy matthieu@grenoble-inp.fr
 ---
  contrib/mw-to-git/git-remote-mediawiki.perl | 66 
 -
  1 file changed, 9 insertions(+), 57 deletions(-)

With s/git.pm/Git.pm/, the above looks perfect.

 @@ -217,22 +167,24 @@ sub mw_connect_maybe {
   $mediawiki = MediaWiki::API-new;
   $mediawiki-{config}-{api_url} = $url/api.php;
   if ($wiki_login) {
 - my %credential = (url = $url);
 - $credential{username} = $wiki_login;
 - $credential{password} = $wiki_passwd;
 - credential_run(fill, \%credential);
 + my %credential = (
 + 'url' = $url,
 + 'username' = $wiki_login,
 + 'password' = $wiki_passwd
 + );
 + Git::credential \%credential;
   my $request = {lgname = $credential{username},
  lgpassword = $credential{password},
  lgdomain = $wiki_domain};
   if ($mediawiki-login($request)) {
 - credential_run(approve, \%credential);
 + Git::credential \%credential, 'approve';

The example in perl/Git.pm for =item credential shows the subroutine
call without surrounding parentheses, and that is perfectly valid
Perl, but given that the prevalent style of subroutine calls made in
this file seems to be with them, i.e. subr(arg, arg), you might want
to consider being consistent here (and in the implicit 'fill' call
several lines above, and 'reject' call below).

Thanks.

   print STDERR Logged in mediawiki user 
 \$credential{username}\.\n;
   } else {
   print STDERR Failed to log in mediawiki user 
 \$credential{username}\ on $url\n;
   print STDERR   (error  .
   $mediawiki-{error}-{code} . ': ' .
   $mediawiki-{error}-{details} . )\n;
 - credential_run(reject, \%credential);
 + Git::credential \%credential, 'reject';
   exit 1;
   }
   }
--
To unsubscribe from this list: send the line unsubscribe git in
the body of a message to majord...@vger.kernel.org
More majordomo info at  http://vger.kernel.org/majordomo-info.html