[nibbula]

Yes. As a Lisp programmer I've almost forgotten that I should be thankful to be able to say something as simple as:

  (defun button-bar (name)
    (let ((i 0))
      (with-html-output (*page*)
        (:div
         (do-query (button-name)
           (select [button-name]
                   :from [tools]
                   :where [= [bar] name])
           (htm (:button
                 (format nil "~@r. ~a" (incf i) button-name))))))))