From 3fe3bfa714312367da087906193fe666fff6c8cb Mon Sep 17 00:00:00 2001
From: Earl Warren <contact@earl-warren.org>
Date: Sun, 22 Oct 2023 17:55:58 +0200
Subject: [PATCH] add a comment to the origin PR with a link to the destination
 PR

Fixes: https://code.forgejo.org/actions/cascading-pr/issues/5
---
 cascading-pr.sh | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/cascading-pr.sh b/cascading-pr.sh
index 2ae8aa3..7794919 100755
--- a/cascading-pr.sh
+++ b/cascading-pr.sh
@@ -41,6 +41,20 @@ function delete_branch() {
     log_info "branch ${options[${direction}_head]} deleted"
 }
 
+function pr_origin_comment_body() {
+    echo "cascading-pr created at ${options[destination_url]}/${options[destination_repo]}/pulls/$(pr_number destination)"
+}
+
+function comment_origin_pr() {
+    cat > $TMPDIR/data <<EOF
+{
+  "body":"$(pr_origin_comment_body)"
+}
+EOF
+    repo_curl ${options[origin_repo]} api_json --data @$TMPDIR/data ${options[origin_api]}/issues/${options[origin_pr]}/comments
+    log_info "comment added to $(pr_url origin)"
+}
+
 function upsert_destination_branch() {
     if $(exists_branch destination) ; then
 	log_info "branch ${options[destination_head]} already exists"
@@ -227,6 +241,7 @@ function run() {
 	    upsert_destination_branch
 	    upsert_destination_pr
 	    repo_login ${options[origin_repo]}
+	    comment_origin_pr
 	    update
 	    wait_destination_ci $(cat $TMPDIR/destination.sha)
 	    ;;