From 0f4148158033caf39d49a3da81fd8972b578928e Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Fri, 8 Jan 2016 01:43:59 +0200
Subject: [PATCH] Add reader macro #ux/tr for simple translation strings.

---
 scripts/build.clj    | 6 +++++-
 scripts/figwheel.clj | 6 +++++-
 scripts/watch.clj    | 6 +++++-
 3 files changed, 15 insertions(+), 3 deletions(-)

diff --git a/scripts/build.clj b/scripts/build.clj
index f62336e4f9..5245eb7e9c 100644
--- a/scripts/build.clj
+++ b/scripts/build.clj
@@ -1,4 +1,8 @@
-(require '[cljs.build.api :as b])
+(require '[cljs.build.api :as b]
+         '[cljs.tagged-literals])
+
+(alter-var-root #'cljs.tagged-literals/*cljs-data-readers*
+                assoc 'ux/tr (fn [v] `(uxbox.locales/tr ~v)))
 
 (println "Building ...")
 
diff --git a/scripts/figwheel.clj b/scripts/figwheel.clj
index efbcf816a5..fa9d0f4a58 100644
--- a/scripts/figwheel.clj
+++ b/scripts/figwheel.clj
@@ -1,5 +1,9 @@
 (require '[figwheel-sidecar.repl :as r]
-         '[figwheel-sidecar.repl-api :as ra])
+         '[figwheel-sidecar.repl-api :as ra]
+         '[cljs.tagged-literals])
+
+(alter-var-root #'cljs.tagged-literals/*cljs-data-readers*
+                assoc 'ux/tr (fn [v] `(uxbox.locales/tr ~v)))
 
 (ra/start-figwheel!
   {:figwheel-options {:css-dirs ["resources/public/css"]}
diff --git a/scripts/watch.clj b/scripts/watch.clj
index 7159360123..5045f5d850 100644
--- a/scripts/watch.clj
+++ b/scripts/watch.clj
@@ -1,4 +1,8 @@
-(require '[cljs.build.api :as b])
+(require '[cljs.build.api :as b]
+         '[cljs.tagged-literals])
+
+(alter-var-root #'cljs.tagged-literals/*cljs-data-readers*
+                assoc 'ux/tr (fn [v] `(uxbox.locales/tr ~v)))
 
 (b/watch (b/inputs "frontend")
   {:main 'uxbox.core