[nongnu] elpa/orgit ac9b1a4286 66/76: orgit-log-export: Reduce arguments to a single branch

[ELPA Syncer]

branch: elpa/orgit
commit ac9b1a42863a864fde9d225890ef5464bffdc646
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    orgit-log-export: Reduce arguments to a single branch
    
    All the forges only support showing the log for a single branch,
    therefore when exporting more complex logs we have to discard some
    information.
---
 orgit.el | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/orgit.el b/orgit.el
index 23f6420491..ffe0e81fd6 100644
--- a/orgit.el
+++ b/orgit.el
@@ -319,7 +319,16 @@ In that case `orgit-rev-store' stores one or more links 
instead."
 
 ;;;###autoload
 (defun orgit-log-export (path desc format)
-  (orgit-export path desc format "log" 2))
+  (pcase-let* ((`(,repo ,args) (split-string path "::"))
+               (first-branch (cond ((string-prefix-p "((" args)
+                                    (caar (read args)))
+                                   ((string-prefix-p "(" args)
+                                    (car (read args)))
+                                   (t args))))
+    (when (string-prefix-p "--" first-branch)
+      (setq first-branch nil))
+    (orgit-export (concat repo "::" first-branch)
+                  desc format "log" 2)))
 
 ;;;###autoload
 (defun orgit-log-complete-link (&optional arg)