             nil  nil)))
 
 (deftest test-get-emender-page
-    "Check the function get-emender-page."
-    (testing "the function get-emender-page."
+    "Check the function zg.server/get-emender-page."
+    (testing "the function zg.server/get-emender-page."
         (are [x y] (= x (get-emender-page y))
             "http://www.emender.org" {:configuration {:display {:emender-page "http://www.emender.org"}}}
             nil  {:configuration {:display {:emender-page nil}}}

;

(deftest test-get-user-name-not-NPE
    "Check the function get-user-name."
    (testing "the function get-user-name."
        (are [x y] (= x (get-user-name y))
            nil nil)))

(deftest test-get-user-name
    "Check the function get-user-name."
    (testing "the function get-user-name."
        (are [x y] (= x (get-user-name y))
            "new user" {:params  {"user-name" "new user"}}
            "new user" {:params  {"user-name" "new user"}

            "old user" {:cookies {"user-name" {:value "old user"}}})))

(deftest test-get-title
    "Check the function zg.server/get-title."
    (testing "the function zg.server/get-title."
        (are [x y] (= x (get-title y))
            "ZG" {:configuration {:display {:app-name "ZG"}}}
            nil  {:configuration {:display {:app-name nil}}}
