picolisp

Unnamed repository; edit this file to name it for gitweb.
git clone https://logand.com/git/picolisp.git/
Log | Files | Refs | README | LICENSE
commit 1f1d9843304901d763432e7eb1beb2ad740c80af
parent b4704f33021027ea5c3c60f791095a88e43a2b94
Author: Alexander Burger <abu@software-lab.de>
Date:   Mon,  6 May 2013 18:15:17 +0200

'+OnClick' GUI prefix class
Diffstat:

Mlib/form.l | 2+-


1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/form.l b/lib/form.l
@@ -1089,7 +1089,7 @@
    (pass extra) )
 
 (dm show> ("Var")
-   (<js> (list (cons 'onclick (pack (eval (: onclick)) "; return false;")))
+   (<js> (list (cons 'onclick (eval (: onclick))))
       (extra "Var") ) )