(define-configuration status-buffer
  ((style (str:concat
           %slot-default%
           (cl-css:css
            `(("#controls"
               :border-top "1px solid white")
              ("#url"
               :background-color "black"
               :color "white"
               :border-top "1px solid white")
              ("#modes"
               :background-color ,*grey*
               :border-top "1px solid white")
              ("#tabs"
               :background-color "white"
               :color "black"
               :border-top "1px solid white")))))))