[cl-who-devel] Problems with indent

[Marco Antoniotti]

On Apr 28, 2011, at 18:57 , Marco Antoniotti wrote:

> 
> On Apr 28, 2011, at 18:09 , Edi Weitz wrote:
> 
>> 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.
> 
> Looking at the code I saw a couple of changes that should help.  But how do you access the SVN repository?  It is not WebDAV'ed.

I meant: how do you do a checkout?

Marco







> 
> Cheers
> --
> Marco
> 
> 
> 
> 
> 
> 
> 
>> 
>> 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
>>> 
>> 
>> _______________________________________________
>> cl-who-devel site list
>> cl-who-devel at common-lisp.net
>> http://common-lisp.net/mailman/listinfo/cl-who-devel
> 
> --
> Marco Antoniotti, Associate Professor				tel.	+39 - 02 64 48 79 01
> DISCo, Università Milano Bicocca U14 2043		http://bimib.disco.unimib.it
> Viale Sarca 336
> I-20126 Milan (MI) ITALY
> 
> Please note that I am not checking my Spam-box anymore.
> Please do not forward this email without asking me first.
> 
> 
> 
> 
> 
> 
> _______________________________________________
> cl-who-devel site list
> cl-who-devel at common-lisp.net
> http://common-lisp.net/mailman/listinfo/cl-who-devel

--
Marco Antoniotti, Associate Professor				tel.	+39 - 02 64 48 79 01
DISCo, Università Milano Bicocca U14 2043		http://bimib.disco.unimib.it
Viale Sarca 336
I-20126 Milan (MI) ITALY

Please note that I am not checking my Spam-box anymore.
Please do not forward this email without asking me first.