I'm using TBNL in a small web-app.&nbsp; A common need when developing webapps is to display a form with fields pre-populated from the database (i.e. email address, street address, etc.).<br><br>I'm wondering if it's possible to do this with cl-who in some generic way?&nbsp; I thought perhaps I could&nbsp; customize cl-who using the convert-tag-to-string-list method.&nbsp; The function below overrides default handling of (:input) tags to look for a :tuple attribute with a value set to a hash containing the values from the database needed to pre-fill the form the input element is part of.&nbsp; This approach doesn't work, however, because convert-tag-to-string serializes the string at compile time, and the data needs to be retrieved from the database at run time.&nbsp; Any ideas?
<br><br>(defmethod convert-tag-to-string-list ((tag (eql :input)) attr-list body body-fn)<br>&nbsp;&nbsp;&nbsp; ;;(declare (ignore attr-list))<br>&nbsp;&nbsp;&nbsp; (let ((name (cdr (assoc :name attr-list)))<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; (type (cdr (assoc :type attr-list)))
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; (tuple (eval (cdr (assoc :tuple attr-list)))))<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; (nconc (cons (format nil &quot;&lt;input name='~a' type='~a' value='~a'&gt;&quot;<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; name type (if tuple<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; (gethash name tuple)
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &quot;&quot;))<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; (funcall body-fn body)) (list &quot;&lt;/input&gt;&quot;))))<br><br><br>Thanks,<br><br>-Adam Thorsen<br>