Add test for category adding

tests/browsertests/categories.nim

@@ -9,16 +9,30 @@ proc selectCategory(session: Session, name: string) =
     click "#category-selection ." & name
 
 
-proc categoriesTests(session: Session, baseUrl: string) =
+proc categoriesUserTests(session: Session, baseUrl: string) =
   let
     title = "Category Test"
     content = "Choosing category test"
 
+  suite "user tests":
+
     with session:
       navigate baseUrl
       wait()
       login "user", "user"
 
+    setup:
+      with session:
+        navigate baseUrl
+        wait()
+
+    test "no category add available":
+      with session:
+        click "#new-thread-btn"
+        wait()
+
+        checkIsNone "#add-category"
+
     test "can create category thread":
       with session:
         click "#new-thread-btn"
@@ -42,11 +56,50 @@ proc categoriesTests(session: Session, baseUrl: string) =
 
     session.logout()
 
+proc categoriesAdminTests(session: Session, baseUrl: string) =
+  let
+    name = "Category Test"
+    color = "Creating category test"
+    description = "This is a description"
+
+  suite "admin tests":
+    with session:
+      navigate baseUrl
+      wait()
+      login "admin", "admin"
+
+    test "can create category":
+      with session:
+        click "#new-thread-btn"
+        wait()
+
+        ensureExists "#add-category"
+
+        click "#add-category .plus-btn"
+        wait()
+
+        clear "#add-category input[name='name']"
+        clear "#add-category input[name='color']"
+        clear "#add-category input[name='description']"
+
+
+        sendKeys "#add-category input[name='name']", name
+        sendKeys "#add-category input[name='color']", color
+        sendKeys "#add-category input[name='description']", description
+
+        click "#add-category #add-category-btn"
+        wait()
+
+        checkText "#category-selection .selected-category", name
+
+    session.logout()
+
 proc test*(session: Session, baseUrl: string) =
   session.navigate(baseUrl)
   session.wait()
 
-  categoriesTests(session, baseUrl)
+  categoriesUserTests(session, baseUrl)
+  categoriesAdminTests(session, baseUrl)
 
   session.navigate(baseUrl)
   session.wait()