anchor.diff:  	(with-html-output (stream)
   	  (htm
   	   (:select :name field
  +		    :id field
   		    :multiple "multiple"
   		    (loop for opt in (cfg::options type)
   		       do (htm
  
positive.code: 	(with-html-output (stream)
  	  (htm
  	   (:input :name field
  		   :type "checkbox"
  		   :checked (if value "checked"))))))))
  
  
negative.code: 	(with-html-output (stream)
  	  (htm
  	   (:select :name field
  		    :id field
  		    (loop for opt in (cfg::options type)
  		       do (htm
  			   (:option :value (cfg::complete-symbol-name (cfg::name opt))
  