diff --git a/source/clog-web.lisp b/source/clog-web.lisp
index df69e9f..6bf5cb4 100644
--- a/source/clog-web.lisp
+++ b/source/clog-web.lisp
@@ -177,7 +177,7 @@ create-web-menu-bar."))
 clog-body."))
 
 (defmethod create-web-menu-bar ((obj clog-obj)
-				&key (class "w3-bar w3-black w3-card-4")
+				&key (class "w3-bar w3-white")
 				  (html-id nil))
   (let ((div (create-div obj :class class :html-id html-id))
 	(app (connection-data-item obj "clog-web")))
@@ -198,7 +198,7 @@ clog-body."))
 
 (defmethod create-web-menu-drop-down ((obj clog-web-menu-bar)
 	          &key (content "")
-		    (class "w3-dropdown-content w3-bar-block w3-card-4")
+		    (class "w3-dropdown-content w3-bar-block")
 		    (html-id nil))
   (let* ((hover  (create-div obj :class "w3-dropdown-hover"))
 	 (button (create-button hover :class "w3-button" :content content))
@@ -283,7 +283,7 @@ icon ⤢ and full screen mode."))
   (:documentation "Add icon as menu bar item."))
 
 (defmethod create-web-menu-icon ((obj clog-web-menu-bar)
-				 &key (image-url "/img/clogwicon.png")
+				 &key (image-url "/img/clogicon.png")
 				   (on-click nil)
 				   (class "w3-button w3-bar-item")
 				   (html-id nil))