picolisp

commit 3882001fa83c9828c764b6260634e43e15ebe096
parent 3b61bb97fe18f216a738dc49fd8afaf4a8fd42cf
Author: Alexander Burger <abu@software-lab.de>
Date:   Tue, 30 Jul 2013 08:18:55 +0200

Minor: Call 'scl' before loading libs
Diffstat:
M
app/main.l
 | 
4
++--
M
doc/ref_.html
 | 
2
+-

2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/app/main.l b/app/main.l
@@ -1,16 +1,16 @@
-# 01jun13abu
+# 30jul13abu
 # (c) Software Lab. Alexander Burger
 
 (allowed ("app/")
    "!start" "!stop" "@lib.css" "!psh" )
 
+(scl 2)
 (load
    "@lib/http.l" "@lib/xhtml.l" "@lib/form.l"
    "@lib/ps.l" "@lib/adm.l"
    "@lib/boss.l" )
 
 (setq
-   *Scl 2
    *Css "@lib.css"
    *Blob "blob/app/"
    *Salt (16 . "$6$@1$") )
diff --git a/doc/ref_.html b/doc/ref_.html
@@ -171,7 +171,7 @@ href="ref_.html#+">+</a></code> and <code><a href="ref_.html#-">-</a></code>.
 : (*/ 100 6)
 -> 17
 
-: (setq *Scl 2)
+: (scl 2)
 -> 2
 : (format (*/ 3.0 1.5 1.0) *Scl)
 -> "4.50"