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 a40b085907c4c25147b9f00234952ac246d795d9
parent 311ae5dc04fb07b278c4278f48de0f2b8447f4ca
Author: Alexander Burger <abu@software-lab.de>
Date:   Fri,  3 May 2013 08:05:48 +0200

Tutorial fix for changed download page
Diffstat:

Mdoc/tut.html | 7++++---


1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/doc/tut.html b/doc/tut.html
@@ -1349,11 +1349,12 @@ site, and prints it to standard output:
 (use (@Date @Name @Size)
    (when
       (match
-         '(@Date " " "-" " " @Name " " "(" @Size ")")
+         '(@Date ~(chop " - &lt;a href=\"") @Name "\"" "&gt;"
+             @Name ~(chop "&lt;/a&gt; (") @Size )
          (client "software-lab.de" 80 "down.html"
             (from "Release Archive")
-            (from ".tgz">")
-            (till "") ) )
+            (from "&lt;li&gt;")
+            (till ",") ) )
       (prinl @Name)
       (prinl @Date " -- " @Size) ) )