From 76a8441a7ea25e664a491a8cc3c04bd9207f7fab Mon Sep 17 00:00:00 2001
From: Simon Belak <simon@metabase.com>
Date: Thu, 25 Oct 2018 13:07:30 +0200
Subject: [PATCH] Group same strings
---
src/metabase/automagic_dashboards/rules.clj | 9 +++++----
1 file changed, 5 insertions(+), 4 deletions(-)
diff --git a/src/metabase/automagic_dashboards/rules.clj b/src/metabase/automagic_dashboards/rules.clj
index 336110c97c2..2f7d009f905 100644
--- a/src/metabase/automagic_dashboards/rules.clj
+++ b/src/metabase/automagic_dashboards/rules.clj
@@ -379,10 +379,11 @@
(defn- make-pot
[strings]
(->> strings
- (sort-by second) ; keep the same context together
- (map (fn [[s ctx]]
- (let [ctx (str/join "/" ctx)]
- (format "#: resources/%s%s.yaml\nmsgid \"%s\"\nmsgstr \"\"\n" rules-dir ctx s))))
+ (group-by first)
+ (mapcat (fn [[s ctxs]]
+ (concat (for [[_ ctx] ctxs]
+ (format "#: resources/%s%s.yaml" rules-dir (str/join "/" ctx)))
+ [(format "msgid \"%s\"\nmsgstr \"\"\n" s)])))
(str/join "\n")))
(defn- all-rules
--
GitLab