Fix incorrect sizing of canvases, closes issue #36

Plus probably another of other unnoticed css-bugs because hiccup doesn't
interpret :class-name anymore

src/cljs/airsonic_ui/components/audio_player/views.cljs

@@ -50,7 +50,7 @@
       (.fill))))
 
 (defn current-progress [current-time seekable duration]
-  [canvas {:class-name "current-progress-canvas"
+  [canvas {:class "current-progress-canvas"
            :draw #(draw-progress % current-time seekable duration)}])
 
 ;; FIXME: It's ugly to have the canvas padding and styling scattered everywhere (sass, drawing code above, and here)

src/cljs/airsonic_ui/components/library/views.cljs

@@ -8,7 +8,7 @@
    [:ul (for [[idx [route label]] (map-indexed vector items)]
           (let [[_ params _] route]
             ^{:key idx} [:li (when (= params active-item)
-                               {:class-name "is-active"})
+                               {:class "is-active"})
                          [:a {:href (apply url-for route)} label]]))]])
 
 ;; this variable determines how many pages before the first known page we should list