diff --git a/src/component/nav-tab.lisp b/src/component/nav-tab.lisp
index b4e6d34..0c25c89 100644
--- a/src/component/nav-tab.lisp
+++ b/src/component/nav-tab.lisp
@@ -14,13 +14,13 @@
 (defmacro nav-item (name active url)
   `(spinneret:with-html
      (:li :class "nav-item"
-	  (:a :class ,(if (null active) nil "nav-link active" "nav-link")
+	  (:a :class ,(if (null active) "nav-link" "nav-link active")
               :href (format nil "#~a" ,url)
               ,name))))
 
 (defmacro nav ((&key (style nil)) &rest rest)
   `(spinneret:with-html
-     (:ul :class ,(if (null style) nil (concatenate 'string "nav " style) "nav")
+     (:ul :class ,(if (null style) "nav" (concatenate 'string "nav " style))
 	  ,@(loop for tab in rest
 	          collect (destructuring-bind (&key name active url) tab
 	        	    `(nav-item ,name ,active ,url))))))