From de0a3de16fe3814f3534850f2df3d03bf9937d7c Mon Sep 17 00:00:00 2001
From: Aaron Bieber <aaron@bolddaemon.com>
Date: Tue, 23 May 2023 11:10:53 -0600
Subject: [PATCH] return subject of pr

---
 pr-status.pl | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/pr-status.pl b/pr-status.pl
index a1f6041..0494116 100755
--- a/pr-status.pl
+++ b/pr-status.pl
@@ -31,11 +31,13 @@ sub get_commit {
     $repo->command( 'fetch', 'origin', "pull/${pr}/head:pr-status-${pr}" );
     $repo->command( 'checkout', "pr-status-$pr" );
     my $commit = $repo->command( 'rev-parse', 'HEAD' );
+    my $log    = $repo->command( 'log', '-n', '1', '--pretty=format:%s' );
     $repo->command( 'checkout', 'master' );
 
     chomp $commit;
+    chomp $log;
 
-    return $commit;
+    return ( $log, $commit );
 }
 
 sub check_nixpkg_branches {
@@ -141,7 +143,7 @@ get '/:pr' => sub ($c) {
 
     return unless $pr =~ m/^\d+$/;
 
-    my $commit = get_commit($pr);
+    my ( $title, $commit ) = get_commit($pr);
 
     my $start = time;
     my $list  = check_nixpkg_branches $commit;
@@ -150,6 +152,7 @@ get '/:pr' => sub ($c) {
     my ( $release, $status ) = figure_status($list);
 
     my $result = {
+        title        => $title,
         branches     => $list,
         pull_request => $pr,
         status       => $status->{state},