From ac74a24de957762618622f00b733d5519cafc098 Mon Sep 17 00:00:00 2001
From: Roland Rabien <roland@rabien.com>
Date: Thu, 14 Jul 2016 19:30:30 -0700
Subject: [PATCH] Fixed integration payload

---
 subversion.pl | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/subversion.pl b/subversion.pl
index 587f966..b219586 100644
--- a/subversion.pl
+++ b/subversion.pl
@@ -22,6 +22,7 @@
 #
 # Requires these perl modules:
 # HTTP::Request
+# LWP::Protocol::https
 # LWP::UserAgent
 # JSON
 
@@ -68,16 +69,16 @@
 
 my $log = `/usr/bin/svnlook log -r $ARGV[1] $ARGV[0]`;
 my $who = `/usr/bin/svnlook author -r $ARGV[1] $ARGV[0]`;
+my $what = `/usr/bin/svnlook changed -r $ARGV[1] $ARGV[0]`;
+my $when = `/usr/bin/svnlook date -r $ARGV[1] $ARGV[0]`;
 my $url = ""; # optionally set this to the url of your internal commit browser. Ex: http://svnserver/wsvn/main/?op=revision&rev=$ARGV[1]
 chomp $who;
 
 my $payload = {
-	'revision'	=> $ARGV[1],
-	'url'		=> $url,
-	'author'	=> $who,
-	'log'		=> $log,
+        'text'          => "Checkin by: $who at $when (rev: $ARGV[1])\n\n$log\n\n$what",
 };
 
+
 my $ua = LWP::UserAgent->new;
 $ua->timeout(15);