Fetch Pr Feedback

Fetch PR Feedback

Fetch review comments from all reviewers on the current PR, format them, and evaluate using the receive-feedback skill. Excludes the PR author and current user by default.

Usage

/beagle-core:fetch-pr-feedback [--pr ] [--include-author]

Flags:

Instructions

1. Parse Arguments

Extract flags from $ARGUMENTS:

2. Get PR Context

# If --pr was specified, use that number directly
Otherwise, get PR for current branch:
gh pr view --json number,headRefName,url,author --jq '{number, headRefName, url, author: .author.login}'
Get repo owner/name
gh repo view --json owner,name --jq '{owner: .owner.login, name: .name}'
Get current authenticated user
gh api user --jq '.login'

Store as $PR_NUMBER, $PR_AUTHOR, $OWNER, $REPO, $CURRENT_USER.

Note: $OWNER, $REPO, etc. are placeholders. Substitute actual values from previous steps.

If no PR exists for current branch, fail with: "No PR found for current branch. Use --pr to specify a PR number."

3. Fetch Comments

Fetch both types of comments, excluding $PR_AUTHOR and $CURRENT_USER (unless --include-author is set). Use --paginate with jq -s to combine paginated JSON arrays into one.

Write jq filters to temp files using heredocs with single-quoted delimiters (prevents shell escaping issues with !=, regex patterns, and angle brackets):

Issue comments (summary/walkthrough posts):

cat > /tmp/issue_comments.jq << 'JQEOF'
def clean_body:
  gsub(".*?"; ""; "s")
  | gsub(""; ""; "s")
  | gsub("
\\s*
\\s*🧩 Analysis chain[\\s\\S]*?
"; ""; "s")
  | gsub("
\\s*
\\s*🤖 Prompt for AI Agents[\\s\\S]*?
"; ""; "s")
  | gsub("
\\s*
\\s*📝 Committable suggestion[\\s\\S]*?
"; ""; "s")
  | gsub("
\\s*
Past reviewee.*?
"; ""; "s")
  | gsub("
\\s*
Recent review details[\\s\\S]*?
"; ""; "s")
  | gsub("
\\s*
\\s*Tips\\b.*?
"; ""; "s")
  | gsub("\\n?---\\n[\\s\\S]*$"; ""; "s")
  | gsub("^\\s+|\\s+$"; "")
  | if length > 4000 then .[:4000] + "\n\n[comment truncated]" else . end
;
[(add // []) | .[] | select(
  .user.login != $pr_author and
  .user.login != $current_user
)] |
map({id, user: .user.login, body: (.body | clean_body), created_at})
JQEOF
gh api --paginate "repos/$OWNER/$REPO/issues/$PR_NUMBER/comments" | \
  jq -s --arg pr_author "$PR_AUTHOR" --arg current_user "$CURRENT_USER" \
  -f /tmp/issue_comments.jq

Review comments (line-specific):

cat > /tmp/review_comments.jq << 'JQEOF'
def clean_body:
  gsub(".*?"; ""; "s")
  | gsub(""; ""; "s")
  | gsub("
\\s*
\\s*🧩 Analysis chain[\\s\\S]*?
"; ""; "s")
  | gsub("
\\s*
\\s*🤖 Prompt for AI Agents[\\s\\S]*?
"; ""; "s")
  | gsub("
\\s*
\\s*📝 Committable suggestion[\\s\\S]*?
"; ""; "s")
  | gsub("
\\s*
Past reviewee.*?
"; ""; "s")
  | gsub("
\\s*
Recent review details[\\s\\S]*?
"; ""; "s")
  | gsub("
\\s*
\\s*Tips\\b.*?
"; ""; "s")
  | gsub("\\n?---\\n[\\s\\S]*$"; ""; "s")
  | gsub("^\\s+|\\s+$"; "")
  | if length > 4000 then .[:4000] + "\n\n[comment truncated]" else . end
;
[(add // []) | .[] | select(
  .user.login != $pr_author and
  .user.login != $current_user
)] |
map({
  id,
  user: .user.login,
  path,
  line_display: (
    .line as $end | .start_line as $start |
    if $start and $start != $end then "\($start)-\($end)"
    else "\($end // .original_line)" end
  ),
  body: (.body | clean_body),
  created_at
})
JQEOF
gh api --paginate "repos/$OWNER/$REPO/pulls/$PR_NUMBER/comments" | \
  jq -s --arg pr_author "$PR_AUTHOR" --arg current_user "$CURRENT_USER" \
  -f /tmp/review_comments.jq

If --include-author is set, omit the --arg pr_author parameter and the .user.login != $pr_author condition from both jq filter files. Keep the $current_user exclusion either way.

4. Format Feedback Document

Noise stripping — handled by the clean_body jq function in Step 3. Order matters: ... blocks are removed first, then remaining HTML comments, then known-noise

# PR #$PR_NUMBER Review Feedback
Reviewer: coderabbitai[bot]
Summary Comments
[Issue comments from this reviewer, each separated by ---]
Line-Specific Comments
[Review comments from this reviewer, each formatted as:]
File: path/to/file.ts:42
[cleaned comment body]
Reviewer: another-reviewer
Summary Comments
...
Line-Specific Comments
...

# Fetch all reviewer comments on current branch's PR (default)
/beagle-core:fetch-pr-feedback
Fetch from a specific PR
/beagle-core:fetch-pr-feedback --pr 123
Include PR author's own comments
/beagle-core:fetch-pr-feedback --include-author
Combined
/beagle-core:fetch-pr-feedback --pr 456 --include-author

# Fetch all reviewer comments on current branch's PR (default)
/beagle-core:fetch-pr-feedback
Fetch from a specific PR
/beagle-core:fetch-pr-feedback --pr 123
Include PR author's own comments
/beagle-core:fetch-pr-feedback --include-author
Combined
/beagle-core:fetch-pr-feedback --pr 456 --include-author