From cd74fb6bf47b7fb97a3e9bf856dc49f786b2c2fb Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Cam=20Sau=CC=88l?= <cammsaul@gmail.com>
Date: Wed, 30 Mar 2016 19:29:11 -0700
Subject: [PATCH] Use case-insensitive sort for GET /api/database :ghost:
---
src/metabase/api/database.clj | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/metabase/api/database.clj b/src/metabase/api/database.clj
index 32ebbeca4df..80a699c529e 100644
--- a/src/metabase/api/database.clj
+++ b/src/metabase/api/database.clj
@@ -53,7 +53,7 @@
(defendpoint GET "/"
"Fetch all `Databases`."
[include_tables]
- (let [dbs (sel :many Database (k/order :name))]
+ (let [dbs (sel :many Database (k/order (k/sqlfn :LOWER :name)))]
(if-not include_tables
dbs
(let [db-id->tables (group-by :db_id (sel :many Table, :active true))]
--
GitLab