mirror of
https://github.com/penpot/penpot.git
synced 2025-03-31 00:51:19 -05:00
3f4ed6faa5
* Colors management * Minor indentation fixes. * Remove redundant naming. * Add missing block comment annotations. * Use consistently defrecord instead of reify. * Remove useless mapcat usage and simplify the related code. * Start using more optimistic updates on collection operations. * Remove println. * Remove ^:const metadata. * Remove neested let. * Replace when with if on sablono templates.
28 lines
873 B
Clojure
28 lines
873 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) 2016 Andrey Antukh <niwi@niwi.nz>
|
|
|
|
(ns uxbox.repo
|
|
"A main interface for access to remote resources."
|
|
(:refer-clojure :exclude [do])
|
|
(:require [uxbox.repo.core :as core]
|
|
[uxbox.repo.auth]
|
|
[uxbox.repo.users]
|
|
[uxbox.repo.projects]
|
|
[uxbox.repo.pages]
|
|
[uxbox.repo.colors]
|
|
[httpurr.status :as status]
|
|
[beicon.core :as rx]))
|
|
|
|
(defn req
|
|
"Perform a side effectfull action accesing
|
|
remote resources."
|
|
([type]
|
|
(core/request type nil))
|
|
([type data]
|
|
(core/request type data)))
|
|
|
|
(def client-error? status/client-error?)
|
|
(def server-error? status/server-error?)
|