[Bese-devel] yaclml: Should not indent before tag

[Drew Crampsie]

The current darcs archive builds and runs using the lib directory from 
arch with Alan's patch applied.

the darcs archive does not contain a systems/ directory at all... i have 
to add it and the run this script from inside the new dir :

#!/bin/sh
  ln -s ../ucw.asd ./
  ln -s ../libs/arnesi/arnesi.asd ./
  ln -s ../libs/cl-icu/cl-icu.asd ./
  ln -s ../libs/iterate/iterate.asd ./
  ln -s ../libs/rfc2388/rfc2388.asd ./
  ln -s ../libs/yaclml/yaclml.asd ./

can we get that added to darcs?

My CLSQL<->UCW stuff is in the process of migrating to use the new forms 
classes. once i have that finished i'll package it up and it can be 
included in UCW propor if you so desire :)

drewc



Alan Shutko wrote:
> yaclml should never emit indentation like this
> <
>  li ...
> 
> <
>  /li>
> 
> It's not allowed by the XML spec.  Probably is allowed by SGML, but if
> we use yaclml to output xhtml, Mozilla refuses to render it correctly.
> 
> --- orig/src/yaclml.lisp
> +++ mod/src/yaclml.lisp
> @@ -110,7 +110,6 @@
>    "Emit the code required to print an open tag whose name is NAME and
>  with the attributes attributes."
>    (emit-princ "<")
> -  (emit-indentation)
>    (emit-princ name)
>    (emit-princ-attributes attributes)
>    (emit-princ ">")
> @@ -120,7 +119,6 @@
>    "Emit the code required to print a close tag whose name is NAME."
>    (decf %yaclml-indentation-depth% 2)
>    (emit-princ "<")
> -  (emit-indentation)
>    (emit-princ "/" name ">"))
>