anchor.diff:  
   (defmethod generate-prompt-html ((prompt-buffer prompt-buffer))
     (markup:markup
  -   (:head ;; (:style (style prompt-buffer))
  -    )
  +   (:head (:style (style prompt-buffer)))
      (:body
       (:div :id "container"
             (:div :id "prompt-input"
  
positive.code:    (current-window)
     (ps:ps (ps:chain document
                      (write (ps:lisp (str:concat (generate-prompt-html prompt-buffer)))))))
    (update-suggestion-html prompt-buffer))
  
  ;; (export-always 'get-marked-suggestions)
  
negative.code:                                :flex-flow "column"
                                 :height "100%")
                   ("#input" :padding "6px 0"
                             :border-bottom "solid 1px lightgray"
                             :width "100%" ; TODO: It fills too much, we need to keep it on the same line as the prompt text.
                             ;; TODO: This autofocus does not work?
                             :autofocus "true")
                   ("#suggestions" :flex-grow "1"
                                   :overflow-y "auto"
                                   :overflow-x "auto")
  