[FIX] User lab

07f3f725 · Alexandre Delanoë · dc29351f · 07f3f725
Commit 07f3f725 authored Oct 06, 2020 by Alexandre Delanoë
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

Contact.hs src/Gargantext/Database/Admin/Types/Hyperdata/Contact.hs +2 -2

No files found.
--- a/src/Gargantext/Database/Admin/Types/Hyperdata/Contact.hs
+++ b/src/Gargantext/Database/Admin/Types/Hyperdata/Contact.hs
@@ -119,8 +119,8 @@ data ContactWhere =
  } deriving (Eq, Show, Generic)

 defaultContactWhere :: ContactWhere
-defaultContactWhere = ContactWhere ["Organization A"]
-                                 ["Organization B"]
+defaultContactWhere = ContactWhere ["Organization X"]
+                                 ["Lab Z"]
                                 (Just "Role")
                                 (Just "Office")
                                 (Just "Country")