branch: main
commit 427577061417f2a0fd0e40f96a3ad1fda7b18faf
Author: Romain GARBAGE <[email protected]>
AuthorDate: Wed May 7 11:18:24 2025 +0200

    gitlab: Add draft support for merge requests.
    
    * src/cuirass/forges/gitlab.scm (<gitlab-merge-request>): Add DRAFT? field.
    (gitlab-merge-request->specification): Set IS-ACTIVE? according to DRAFT? 
value.
    * tests/gitlab.scm: Update tests.
    * tests/http.scm: Update tests.
    
    Signed-off-by: Ludovic Courtès <[email protected]>
---
 src/cuirass/forges/gitlab.scm | 2 ++
 tests/gitlab.scm              | 5 +++++
 tests/http.scm                | 2 ++
 3 files changed, 9 insertions(+)

diff --git a/src/cuirass/forges/gitlab.scm b/src/cuirass/forges/gitlab.scm
index ced8907..87e6a8b 100644
--- a/src/cuirass/forges/gitlab.scm
+++ b/src/cuirass/forges/gitlab.scm
@@ -69,6 +69,7 @@
                    json->gitlab-project)
   (id              gitlab-merge-request-id "iid")
   (url             gitlab-merge-request-url)
+  (draft?          gitlab-merge-request-draft? "draft")
   (cuirass-options gitlab-merge-request-cuirass-options "cuirass"
                    (lambda (v)
                      (if (unspecified? v)
@@ -143,6 +144,7 @@
      (priority priority)
      (period period)
      (systems systems)
+     (is-active? (not (gitlab-merge-request-draft? merge-request)))
      (properties
       (let ((target (gitlab-merge-request-target merge-request)))
         `((forge-type . gitlab)
diff --git a/tests/gitlab.scm b/tests/gitlab.scm
index 1e29f73..e0702ab 100644
--- a/tests/gitlab.scm
+++ b/tests/gitlab.scm
@@ -45,6 +45,7 @@
         \"action\": \"open\",
         \"merge_status\": \"can_be_merged\",
         \"iid\": 1,
+        \"draft\": false,
         \"source_branch\": \"test-branch\",
         \"source\": {
             \"git_http_url\": 
\"https://gitlab.instance.test/source-repo/fork-name.git\";,
@@ -70,6 +71,7 @@
         \"action\": \"open\",
         \"merge_status\": \"can_be_merged\",
         \"iid\": 2,
+        \"draft\": false,
         \"source_branch\": \"test-branch\",
         \"source\": {
             \"git_http_url\": 
\"https://gitlab.instance.test/source-repo/fork-name.git\";,
@@ -108,6 +110,7 @@
         \"action\": \"open\",
         \"merge_status\": \"can_be_merged\",
         \"iid\": 1,
+        \"draft\": false,
         \"source_branch\": \"test-branch\",
         \"source\": {
             \"git_http_url\": 
\"https://gitlab.instance.test/source-repo/fork-name.git\";,
@@ -142,6 +145,7 @@
         \"action\": \"open\",
         \"merge_status\": \"can_be_merged\",
         \"iid\": 1,
+        \"draft\": false,
         \"source_branch\": \"test-branch\",
         \"source\": {
             \"git_http_url\": 
\"https://gitlab.instance.test/source-repo/fork-name.git\";,
@@ -170,6 +174,7 @@
         \"action\": \"open\",
         \"merge_status\": \"can_be_merged\",
         \"iid\": 2,
+        \"draft\": false,
         \"source_branch\": \"test-branch\",
         \"source\": {
             \"git_http_url\": 
\"https://gitlab.instance.test/source-repo/fork-name.git\";,
diff --git a/tests/http.scm b/tests/http.scm
index 74472ad..cff2892 100644
--- a/tests/http.scm
+++ b/tests/http.scm
@@ -104,6 +104,7 @@
         \"action\": \"open\",
         \"merge_status\": \"can_be_merged\",
         \"iid\": 1,
+        \"draft\": false,
         \"source_branch\": \"test-branch\",
         \"source\": {
             \"git_http_url\": 
\"https://gitlab.instance.test/source-repo/fork-name.git\";,
@@ -129,6 +130,7 @@
         \"action\": \"close\",
         \"merge_status\": \"can_be_merged\",
         \"iid\": 1,
+        \"draft\": false,
         \"source_branch\": \"test-branch\",
         \"source\": {
             \"git_http_url\": 
\"https://gitlab.instance.test/source-repo/fork-name.git\";,

Reply via email to