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 4641949434aae0eb3f2f777bb78f47aad45ac3a7
parent aeaec52fcc4b64c247d36f8aa2b2078a4cd7def9
Author: Alexander Burger <abu@software-lab.de>
Date:   Fri,  6 May 2011 15:37:34 +0200

Changed '@' to '!' for functions in URLs
Diffstat:

Mlib/form.l | 2+-


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

diff --git a/lib/form.l b/lib/form.l
@@ -186,7 +186,7 @@
                ((disallowed)
                   (notAllowed *Url)
                   (http404) )
-               ((= '@ (car Url))
+               ((= '! (car Url))
                   ((intern (pack (cdr Url)))) )
                ((tail '("." "l") Url)
                   (load *Url) ) ) ) ) ) )