ssoma-mda: Use the email subject as the commit message

[ssoma-mda.git] / lib / Ssoma / MDA.pm

diff --git a/lib/Ssoma/MDA.pm b/lib/Ssoma/MDA.pm
index 02816a5dd6da1f5f04d72b8c9233e835d795ef9f..6b58b430e6a4b8e4ea8d6b27c837f9518481d2f3 100644 (file)
--- a/lib/Ssoma/MDA.pm
+++ b/lib/Ssoma/MDA.pm
@@ -102,7 +102,8 @@ sub append {
                my $id = $git->simple_to_blob($simple);
                $gii->update('100644', $id, $path);
        }
-       $git->commit_index($gii, 0, $ref, "mda");
+       my $subject = $simple->header("Subject");
+       $git->commit_index($gii, 0, $ref, $subject);
 }
 
 # the main entry point takes an Email::Simple object