anchor.diff:    (awhen (window-component.icon window)
       (<:link :rel "icon"
   	    :type "image/x-icon"
  -	    :href it))
  -  (dolist (stylesheet (effective-window-stylesheets window))
  -    (<:link :rel "stylesheet"
  -	    :href stylesheet
  -	    :type "text/css")))
  +	    :href it)))
   
   (defmethod render-html-body ((window standard-window-component))
     (render (window-body window)))
  
positive.code:  (:JS form) - equivalent to (:SCRIPT (js:js* form))
   (:SCRIPT string) - write <script>STRING</script>.
  
  The elements will be rendered in order."))
    (:documentation "A mixin that renders basic html toplevel tags."))
  
  (defgeneric effective-window-stylesheets (window)
  
negative.code:       (<:link :rel "icon"
  	      :type "image/x-icon"
  	      :href it))
      (unless (window-component.defer-css window)
        (<:link :rel "stylesheet"
  	      :href stylesheet
  	      :type "text/css"))))
  