(def opstring (key val)
  `(aif ,val (pr " " ',key "=\"" it #\")))

From html.arc ©