1 files changed, 15 insertions, 5 deletions
diff --git a/guix-qa-frontpage/server.scm b/guix-qa-frontpage/server.scm
index 2f725bb..15dc3db 100644
--- a/guix-qa-frontpage/server.scm
+++ b/guix-qa-frontpage/server.scm
@@ -434,11 +434,21 @@ port. Also, the port used can be changed by passing the --port option.\n"
          (let ((derivation-changes
                 (with-exception-handler
                     (lambda (exn)
-                      (simple-format
-                       (current-error-port)
-                       "failed fetching derivation changes for issue ~A: ~A\n"
-                       (car series)
-                       exn)
+                      (unless (and (guix-data-service-error? exn)
+                                   ;; This probably just means the target
+                                   ;; revision hasn't been processed yet. The
+                                   ;; Guix Data Service should send a more
+                                   ;; informative response though.
+                                   (string=?
+                                    (assoc-ref
+                                     (guix-data-service-error-response-body exn)
+                                     "error")
+                                    "invalid query"))
+                        (simple-format
+                         (current-error-port)
+                         "failed fetching derivation changes for issue ~A: ~A\n"
+                         (car series)
+                         exn))
 
                       #f)
                   (lambda ()