commit 5199fdd18f3c048ca9a9ddab95a8aa88fed0be1e
author Alexander Shorin <kxepal@apache.org> Wed Feb 25 22:03:21 2015 +0300
committer Alexander Shorin <kxepal@apache.org> Thu Feb 26 23:24:22 2015 +0300
tree 53df912582764e5abd77f2af8625d92b966e9661
parent 9664463d9b2b2dc11f1a28896eaee6b39ec5177f

Use list of system database names

This closes #15

COUCHDB-2619
COUCHDB-2620

src/fabric_db_create.erl

diff --git a/src/fabric_db_create.erl b/src/fabric_db_create.erl
index 8b9d32a..6678d5b 100644
--- a/src/fabric_db_create.erl
+++ b/src/fabric_db_create.erl
@@ -45,12 +45,11 @@
         case re:run(DbName, ?DBNAME_REGEX, [{capture,none}, dollar_endonly]) of
         match ->
             ok;
-        nomatch when DbName =:= <<"_users">> ->
-            ok;
-        nomatch when DbName =:= <<"_replicator">> ->
-            ok;
         nomatch ->
-            {error, illegal_database_name}
+            case lists:member(?b2l(DbName), ?SYSTEM_DATABASES) of
+            true -> ok;
+            false -> {error, illegal_database_name}
+            end
         end
     end.