mirror of
https://github.com/penpot/penpot.git
synced 2025-12-11 22:14:05 +01:00
28cf67e7ff
Some checks failed
_STAGING / build-bundle (push) Has been cancelled
_STAGING / build-docker (push) Has been cancelled
_DEVELOP / build-bundle (push) Has been cancelled
_DEVELOP / build-docker (push) Has been cancelled
Commit Message Check / Check Commit Message (push) Has been cancelled
* 🎉 Add management RPC API And refactor internal http auth flow * 📎 Adjust final url namings * 📚 Update changelog
37 lines
989 B
Clojure
37 lines
989 B
Clojure
;; This Source Code Form is subject to the terms of the Mozilla Public
|
|
;; License, v. 2.0. If a copy of the MPL was not distributed with this
|
|
;; file, You can obtain one at http://mozilla.org/MPL/2.0/.
|
|
;;
|
|
;; Copyright (c) KALEIDOS INC
|
|
|
|
(ns backend-tests.rpc-doc-test
|
|
"Internal binfile test, no RPC involved"
|
|
(:require
|
|
[app.common.json :as json]
|
|
[app.common.pprint :as pp]
|
|
[app.common.schema :as sm]
|
|
[app.common.schema.generators :as sg]
|
|
[app.common.schema.test :as smt]
|
|
[app.rpc :as-alias rpc]
|
|
[app.rpc.doc :as rpc.doc]
|
|
[backend-tests.helpers :as th]
|
|
[clojure.test :as t]))
|
|
|
|
(t/use-fixtures :once th/state-init)
|
|
|
|
(t/deftest openapi-context-json-encode
|
|
(smt/check!
|
|
(smt/for [context (->> sg/int
|
|
(sg/fmap (fn [_]
|
|
(#'rpc.doc/openapi-context (::rpc/methods th/*system*)))))]
|
|
(try
|
|
(json/encode context)
|
|
true
|
|
(catch Throwable _cause
|
|
false)))
|
|
{:num 15}))
|
|
|
|
|
|
|
|
|