From 6b571fd2bb0bec60d08744d24f0bfc6add65c600 Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Mon, 30 Aug 2021 12:39:06 +0200
Subject: [PATCH] :bug: Fix wrong pages filtering on view-only-bundle rpc
 output.

---
 backend/src/app/rpc/queries/viewer.clj | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/backend/src/app/rpc/queries/viewer.clj b/backend/src/app/rpc/queries/viewer.clj
index bddae363c..2f5334d99 100644
--- a/backend/src/app/rpc/queries/viewer.clj
+++ b/backend/src/app/rpc/queries/viewer.clj
@@ -90,7 +90,8 @@
         (some? slink)
         (assoc :share slink)
 
-        (not (contains? (:flags slink) "view-all-pages"))
+        (and (some? slink)
+             (not (contains? (:flags slink) "view-all-pages")))
         (update-in [:file :data] (fn [data]
                                    (let [allowed-pages (:pages slink)]
                                      (-> data