[cl-who-devel] Problems with indent

[Edi Weitz]

Sorry for the late reply, but CL-WHO is essentially unmaintained these
days.  I noticed that you're using an unexported variable, so I think
you got what you deserved... :)

Patches (see <http://weitz.de/patches.html>) are welcome, but please
take a look at the BKNR repository first where you'll find a
preliminary 1.0.0 version of CL-WHO which might or might not do what
you want.

Cheers,
Edi.


On Sun, Apr 17, 2011 at 3:05 PM, Marco Antoniotti
<antoniotti.marco at disco.unimib.it> wrote:
> Hi,
> I would like to use CL-WHO for a little project of mine and I am getting
> bogged down by the :indent behavior.  Note that I am not trying to generate
> any PRE tags (yet).  The following snippet illustrates the problem.  Given
> the expansion of with-html-output, cl-who::*indent* does not behave as a
> special variable and this prevents me from producing "properly" indented
> HTML.
>
> (use-package "CL-WHO")
>
> (defun who-test (x &optional (out *standard-output*) (indent 2))
>   (let ((cl-who::*indent* indent))
>     (declare (special cl-who::*indent*))
>     (with-html-output (out out :indent 4 #| indent |#)
>       (htm (:body (:frameset :rows "65px" :border 0 :noresize "noresize"
>                    (frame-stuff x)))
>            ))))
>
> (defun frame-stuff (x &optional (out *standard-output*))
>   (with-html-output (out out :indent 3)
>     (htm (:frame :src x))))
>
> If you remove the 4 and uncomment indent you will see what happens.
> Any suggestions about how to "fix" this?  Note that I do want the inner
> function pretty much 'as-is'.
> Cheers
> Marco
>
> _______________________________________________
> cl-who-devel site list
> cl-who-devel at common-lisp.net
> http://common-lisp.net/mailman/listinfo/cl-who-devel
>