fix broken test

charignon · Oct 10, 2021 · 37ad44a · 37ad44a
1 parent 6a9e34f
commit 37ad44a
Showing 1 changed file with 10 additions and 8 deletions.
diff --git a/github-review.el b/github-review.el
@@ -341,8 +341,10 @@ ACC is an alist accumulating parsing state."
          (parsed-comments (a-get parsed-data 'comments))
          (parsed-body (s-trim-right (a-get parsed-data 'body)))
          (merged-comments (when parsed-comments (github-review-merge-comments (reverse parsed-comments)))))
-    `((body . ,parsed-body)
-      (comments . ,(reverse merged-comments)))))
+    (if (equal nil merged-comments)
+        `((body . ,parsed-body))
+      `((body . ,parsed-body)
+        (comments . ,(reverse merged-comments))))))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; Buffer interactions ;;
@@ -614,12 +616,12 @@ Github API provides only the originalPosition in the query.")
 
     (if (not (forge-pullreq-p pullreq))
         (message "We can only review PRs at the moment. You tried on something else.")
-        (progn 
-          (setq forge-current-dir default-directory)  
-          (github-review-start-internal (a-alist  'owner   (oref repo owner)
-                                                  'repo    (oref repo name)
-                                                  'apihost (oref repo apihost)
-                                                  'num     (oref pullreq number)))))))
+      (progn
+        (setq forge-current-dir default-directory)
+        (github-review-start-internal (a-alist  'owner   (oref repo owner)
+                                                'repo    (oref repo name)
+                                                'apihost (oref repo apihost)
+                                                'num     (oref pullreq number)))))))
 
 ;;;###autoload
 (defun github-review-start (url)