From d0a8d765268c67c3faf084492b9c9b970a2955db Mon Sep 17 00:00:00 2001
From: Dominik Meyer <dmeyer@federationhq.de>
Date: Sat, 15 Sep 2018 22:46:47 +0200
Subject: [PATCH] ADD: added close_commit support

---
 lib/Git/IssueManager.pm       |  6 ++++++
 lib/Git/IssueManager/Issue.pm | 16 ++++++++++++++++
 2 files changed, 22 insertions(+)

diff --git a/lib/Git/IssueManager.pm b/lib/Git/IssueManager.pm
index acc40e6..3e660c4 100644
--- a/lib/Git/IssueManager.pm
+++ b/lib/Git/IssueManager.pm
@@ -292,6 +292,7 @@ sub parseIssue
   my $estimated     = $d->find("estimated");
   my $working       = $d->find("working");
   my $tags          = $d->find("tags");
+  my $close_commit  = $d->find("close_commit");
   my $id            = $tag . "-" . substr($subject->hash(),0,8);
   my $cd            = $d->find("creation_date");
   my $ld            = $d->find("last_change_date");
@@ -341,6 +342,11 @@ sub parseIssue
     $issue->closed_date(DateTime->from_epoch( epoch =>$cld->content, time_zone=>$tz));
   }
 
+  if (defined($close_commit) && $issue->status eq "closed")
+  {
+    $issue->close_commit($close_commit->content());
+  }
+
   if (defined($worker))
   {
     $worker->content()=~/^(.*)\<(.*)\>$/;
diff --git a/lib/Git/IssueManager/Issue.pm b/lib/Git/IssueManager/Issue.pm
index 6ab29b0..6422b3b 100644
--- a/lib/Git/IssueManager/Issue.pm
+++ b/lib/Git/IssueManager/Issue.pm
@@ -289,6 +289,14 @@ has 'working_time' => (is => 'rw', isa=>'Num', default => 0, trigger => sub {
 });
 
 
+=attr close_commit
+
+  the hash of the commit which closed this issue
+
+=cut
+has 'close_commit' => (is => 'rw', isa=>'Str', default =>"");
+
+
 =method addTag
 
 add another tag to the issue.
@@ -529,6 +537,14 @@ sub createIssue
     $issueTree->add($comment);
   }
 
+  if (defined($self->close_commit) && length($self->close_commit)> 0 && $self->status eq "closed")
+  {
+    my $close_commit    = $issueTree->newBlob();
+    $close_commit->path("close_commit");
+    $close_commit->_content($self->close_commit);
+    $issueTree->add($close_commit);
+  }
+
   if (defined($self->description) && length($self->description)> 0)
   {
     my $description = $issueTree->newBlob();