[Ugly hack to support ((lambda ...) ...)
Marco Baringer <mb@bese.it>**20050813142023] hunk ./js.lisp 517
-    (dwim-join (list (js-to-strings (f-function form) (+ start-pos 2))
-		     args)
+    (dwim-join (typecase (f-function form)
+                 (js-defun (list (list "(")
+                                 (js-to-strings (f-function form) (+ start-pos 2))
+                                 (list ")")
+                                 args))
+                 (t (list (js-to-strings (f-function form) (+ start-pos 2))
+                          args)))