anchor.diff:    (update-candidates minibuffer)
     (setf (content minibuffer)
           (markup:markup
  -         (:head (:style (minibuffer-style minibuffer)))
  +         (:head (:style (minibuffer-style minibuffer))
  +                (:style (user-style minibuffer)))
            (:body
             (:div :id "container"
                   (:div :id "input" (:span :id "prompt" "") (:span :id "input-buffer" ""))
  
positive.code:                  (.selected :background-color "gray"
                              :color "white")))
      :documentation "The CSS applied to a minibuffer when it is set-up.")
     (override-map :accessor override-map
                   :initform (let ((map (make-keymap "overide-map")))
                               (define-key map
  
negative.code:      show-completion-count-p
       max-lines
       minibuffer-style
       user-style
       override-map)))
  
  (defclass minibuffer (buffer)
  