From df480c9d52416c6a8cbacd7ed7abbdacc43be4a9 Mon Sep 17 00:00:00 2001
From: Kyle Meyer <kyle@kyleam.com>
Date: Sat, 6 Jun 2020 21:45:29 -0400
Subject: Add function for accessing inbox's URL

---
 piem.el | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/piem.el b/piem.el
index d70e98e..3a9233e 100644
--- a/piem.el
+++ b/piem.el
@@ -259,6 +259,11 @@ the following information about the patch series:
              (repo (plist-get (cdr (assoc p piem-inboxes)) :coderepo)))
     (expand-file-name repo)))
 
+(defun piem-inbox-url ()
+  "Return the URL of current buffer's inbox."
+  (when-let ((p (piem-inbox)))
+    (plist-get (cdr (assoc p piem-inboxes)) :url)))
+
 (defun piem-inbox-coderepo-maybe-read ()
   "Like `piem-inbox-coderepo', but fall back to reading the repo."
   (or (piem-inbox-coderepo)
-- 
cgit v1.2.3