From b086d12760bdd43a8401f410c4c19ceebee00539 Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Mon, 21 Nov 2016 18:14:10 +0100
Subject: [PATCH] Add `rsp?` predicate.

---
 backend/src/uxbox/util/response.clj | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/backend/src/uxbox/util/response.clj b/backend/src/uxbox/util/response.clj
index c1bc2a097..4ecf79dae 100644
--- a/backend/src/uxbox/util/response.clj
+++ b/backend/src/uxbox/util/response.clj
@@ -67,3 +67,7 @@
   "A shortcut for create a response instance."
   [data]
   (Rsp. data))
+
+(defn rsp?
+  [v]
+  (instance? Rsp v))