 
 (defn add-new-component
     [component-name group-id]
+    (log/info component-name group-id)
     (try
         (jdbc/insert! db-spec/hurvinek-db
                         :components {:name component-name

(defn read-components
    "Read list of all components for selected group."
    [group-id]
    (try
        (jdbc/query db-spec/hurvinek-db
                        ["select id, name from components where group_id=? order by name" group-id])

(defn read-groups
    "Read list of all groups for selected chapter (and product - it is implicit)."
    [chapter-id]
    (log/info chapter-id)
    (try
        (jdbc/query db-spec/hurvinek-db
                        ["select id, name from groups where chapter=? order by name" chapter-id])
