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 066a1c79f5217b060b5b158a7d156a30ec30d82f
parent 3f5543629dbdf86e996049584e9d7ce79fdbaf91
Author: Alexander Burger <abu@software-lab.de>
Date:   Mon, 21 Jan 2013 18:50:53 +0100

Minor cosmetics
Diffstat:
Mlib/adm.l | 4++--
1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/adm.l b/lib/adm.l @@ -20,9 +20,9 @@ (range 97 122) ) ) (& 63 (rd 1)) ) ) ) ) ) ) ) -(de passwd (Str Pw) +(de passwd (Str Salt) (if (and native *Salt) - (native "libcrypt.so" "crypt" 'S Str (or Pw (salt))) + (native "libcrypt.so" "crypt" 'S Str (or Salt (salt))) Str ) ) (de auth (Nm Pw)