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
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@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@common-lisp.net http://common-lisp.net/mailman/listinfo/cl-who-devel
On Apr 28, 2011, at 18:09 , Edi Weitz wrote:
Sorry for the late reply,
No problems.
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... :)
Yeah. I know :) But I swear I went down to the unexported variable only after trying all other ways :)
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.
Ok. Will do.
Thanks
-- Marco
Cheers, Edi.
On Sun, Apr 17, 2011 at 3:05 PM, Marco Antoniotti antoniotti.marco@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@common-lisp.net http://common-lisp.net/mailman/listinfo/cl-who-devel
cl-who-devel site list cl-who-devel@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.
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.
Cheers -- Marco
Cheers, Edi.
On Sun, Apr 17, 2011 at 3:05 PM, Marco Antoniotti antoniotti.marco@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@common-lisp.net http://common-lisp.net/mailman/listinfo/cl-who-devel
cl-who-devel site list cl-who-devel@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.
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@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@common-lisp.net http://common-lisp.net/mailman/listinfo/cl-who-devel
cl-who-devel site list cl-who-devel@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@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.
On Thu, Apr 28, 2011 at 5:58 PM, Marco Antoniotti antoniotti.marco@disco.unimib.it wrote:
I meant: how do you do a checkout?
http://bknr.net/html/getting.html
Replace "trunk" with "ediware".
Thanks.
Marco
On Apr 28, 2011, at 20:17 , Edi Weitz wrote:
On Thu, Apr 28, 2011 at 5:58 PM, Marco Antoniotti antoniotti.marco@disco.unimib.it wrote:
I meant: how do you do a checkout?
http://bknr.net/html/getting.html
Replace "trunk" with "ediware".
cl-who-devel site list cl-who-devel@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.
-
Edi Weitz -
Marco Antoniotti