anchor.diff:  		   :id field
   		   :value (if value value))))))))
   
  -(defmethod render-option-editor ((type cfg::sexp-configuration-schema-option-type)
  +
  +(defmethod render-option-editor ((type cfg::email-configuration-schema-option-type)
   				 option-schema
   				 option
   				 value
  
positive.code:   (let (input-value)
      (with-form-field (field :writer (lambda (val)
  				      (setf input-value val)))
        (with-change-notifier (field stream :on-change (lambda ()
  						       (funcall writer input-value)))
  	(with-html-output (stream)
  	  (htm
  	   (:input :type "text"
  
negative.code: 		   :id field
  		   :value (if value value))))))))
  
  (defmethod render-option-editor ((type cfg::url-configuration-schema-option-type)
  				 option-schema
  				 option
  				 value
  