message module name and versions

miyagawa · Feb 22, 2010 · 5fd61f6 · 5fd61f6
1 parent da5f055
commit 5fd61f6
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/plugins/git_site_perl b/plugins/git_site_perl
@@ -29,8 +29,9 @@ hook install_success => sub {
     if (-e $site_perl && -w _) {
         my $cwd = Cwd::cwd();
         chdir $site_perl or die $!;
+        my $message = "$args->{meta}->{name} $args->{meta}->{version} ($args->{module})";
         $args->{app}->run("git add .") &&
-        $args->{app}->run("git commit -m " . Util::quote($args->{module}));
+        $args->{app}->run("git commit -m " . Util::quote($message));
         chdir $cwd;
     }
 };