aboutsummaryrefslogtreecommitdiff
path: root/guix-qa-frontpage/patchwork.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guix-qa-frontpage/patchwork.scm')
-rw-r--r--guix-qa-frontpage/patchwork.scm10
1 files changed, 6 insertions, 4 deletions
diff --git a/guix-qa-frontpage/patchwork.scm b/guix-qa-frontpage/patchwork.scm
index 42ddfb7..04a15e6 100644
--- a/guix-qa-frontpage/patchwork.scm
+++ b/guix-qa-frontpage/patchwork.scm
@@ -114,10 +114,12 @@
(result '()))
- (if (> (peek "LEN" (length result)) count)
- (let* ((count-items
- rest
- (split-at! result count))
+ (if (> (length result) count)
+ (let* ((rest
+ count-items
+ (split-at! result
+ (- (length result)
+ count)))
(debbugs-guix-usertag-data
(call-with-delay-logging debbugs-get-issues-with-guix-usertag))