- cl-who-devel@common-lisp.net - mailman3.common-lisp.net

[cl-who-devel] Evaluating forms inside of with-html-output-to-string
by Andrew Pennebaker 03 Mar '11

03 Mar '11

According to the documentation, with-html-output-to-string can evaluate Lisp forms. In my experience, this is not the case. (cl-who:with-html-output-to-string (*standard-output* nil :prologue nil :indent t) (:p (concatenate 'string "abc" "def"))) Should return " abcdef " but it actually returns " " Specs: - Lispbox CCL 1.6 - Mac OS X 10.6.6 and Ubuntu 10.10 Maverick Cheers, Andrew Pennebaker

3 3

[cl-who-devel] Expected behavior?
by Andrei Stebakov 26 Oct '10

26 Oct '10

I wonder if following two statements should produce the same result: (with-html-output-to-string (*standard-output* nil :indent t) (:p "text")) and (with-html-output-to-string (*standard-output* nil :indent t) (:p (str (concatenate 'string "te" "xt")))) So far the first statement gives: " text " The second: " text " What happens to the indentation in the second case? I am using cl-who 0.11.1 with sblc 1.0.37 on Linux Thank you, Andrei

2 1

[cl-who-devel] Adding support for HTML5 doctype
by Chaitanya Gupta 13 Oct '10

13 Oct '10

Hi, I needed to emit some HTML5 from cl-who the other day. Attached is a patch which adds support for an :HTML5 mode to cl-who. Essentially, it just sends the correct doctype. Hope this patch is fine. Chaitanya -- http://chaitanyagupta.com/blog/

2 8

[cl-who-devel] Case sensitive tags with cl-who
by rrl 05 Sep '10

05 Sep '10

Hi, I know that by setting *DOWNCASE-TOKENS-P* to NIL, keyword symbols representing a tag or attribute name will not be automatically converted to lowercase. The problem is most of the time, the default behavior is just fine. But I want to generate case-sensitive XML in just one function. Which is annoying since I need to rewrite all the other tags in the form :|html| if I set *DOWNCASE-TOKENS-P* to NIL. The attached patch just adds an additional keyword argument :downcase-tokens-p to WITH-HTML-OUPUT, WITH-HTML-OUTPUT-TO-STRING and SHOW-HTML-EXPANSION whose default value is the same as *DOWNCASE-TOKENS-P*, but whose scope is local to the generated code. Best regards,

2 2

[cl-who-devel] empty web page
by a 04 Jun '10

04 Jun '10

Hi. When I try to open a web page generated by cl-who I get an empty web page: ------------------------------------------------------------ (start (make-instance 'acceptor :port 8000)) (push (create-prefix-dispatcher "/index.html" 'index) *dispatch-table*) (defun index () (with-html-output (*standard-output* nil :indent t) (:html (:head (:title "Test page")) (:body (dotimes (x 10) (:htm (:p "Text")))))) ----------------------------------------------------------- and page on http://localhost:8000/index.html is empty. The source of the page is just: ---------------- </body> </html> -------------- Where is the problem ? If I remove dynamic code "(dotimes (x 10) ..." then it renders the page correctly. Thanks

3 2

[cl-who-devel] Macros for outlining
by J. K. Cunningham 28 Mar '10

28 Mar '10

I've been playing around with a way to partially automate writing outline-based pages and run into something I don't know how to do. I'm hoping someone can perhaps offer a solution or point me in the right direction. I've reduced the scope to a fairly simple situation which might seem unmotivated in this form. But if I can find a way to do this, the rest of what I'm doing will fall into place. I'd like to be able to write code that looks like this (example): (let ((hform "A Title")) (with-html-output (*standard-output* nil :indent 0) (section (hform) (:p "A paragraph can go here. ") (section ("A Subtitle") "Subsection text goes here.")) (section ("Second Title") "Any cl-who syntax input here:" (:ol (:li "Item 1") (:li "Item 2"))))) where SECTION would be a macro so that it can take CL-WHO syntax arguments. The idea is that the SECTION macro would expand so that I ended up effectively with this: (let ((form "A Title")) (with-html-output (*standard-output* nil :indent 0) (:h1 (str form)) (:p "A paragraph can go here. ") (:h2 "A Subtitle") "Subsection text goes here." (:h1 "Second Title") "Any cl-who syntax input here:" (:ol (:li "Item 1") (:li "Item 2")))) I came up with a helper macro like this to handle the levels as a variable: (defmacro hn (level &body body) ``(,(intern (format nil "H~d" ,level) :keyword) ,,@body)) (let ((lvl 2) (title "A Title")) (with-html-output (*standard-output*) (str (hn lvl (:b (str title)))))) ;; => <h2>A Title</h2> This enables me to write code that looks like this: (defmacro section ((n &rest heading) &body body) `(str (with-html-output-to-string (s nil :indent 0) (str (hn ,n ,@heading)) (str (with-html ,@body))))) (let ((lvl 1) (form "A Title")) (with-html-output (*standard-output* nil :indent 0) (section (lvl form) (:p "A paragraph can go here. ") (section ((1+ lvl) "A Subtitle") "Subsection text goes here.")) (section (lvl "Second Title") "Any cl-who syntax input here:" (:ol (:li "Item 1") (:li "Item 2"))))) But this leaves me with having to manage the levels manually. What I can't figure out how to do is write the SECTION macro so it doesn't require the LVL arguments, incrementing them recursively. If it could be written as a function, I could use a closure that started at LVL = 1 and incremented at each level, but I'm not good enough with macros to see how to do this. I'm probably looking at this the wrong way. Does anyone have any ideas how to go about this? Regards, Jeff Cunningham

2 2

[cl-who-devel] macroexpansion support (on Github)
by Vsevolod Dyomkin 21 Feb '10

21 Feb '10

Hi! Every once in a while there arises a question in this group or elsewhere of adding support for macroexpansion inside WITH-HTML-OUTPUT. I was also one of those, who asked this question in 2008. Later I've experimented with different approaches and summarized them in a blog post: http://lisp-univ-etc.blogspot.com/2009/03/cl-who-macros.html (although it could be more elaborate on some issues). I continue to use the third of the described approaches in several projects, and also decided to post the code for public consumption (as it is quite robust in my opinion). So now it is available from my Github account: http://github.com/vseloved/cl-who. The fork has version 0.11.X not to mess up with the mainline versioning. I have also updated the doc to reflect the introduced changes. I hope this will be useful. Best regards, Vsevolod

1 0

[cl-who-devel] Runtime HTML generation
by Ron Garret 24 Jan '10

24 Jan '10

Is there a Right Way to use CL-WHO to generate HTML at run time? For example, suppose I want to do something like this: (defun make-table (l) `(:table ,@(mapcar (lambda (row) `(:tr ,@(mapcar (lambda (cell) `(:td (str ,cell))) row))) l))) (cl-who:with-html-output-to-string (*standard-output* nil :prologue t) ... (make-table l) ...) This doesn't work because CL-WHO normally does all its work at compile time, but L is not known until run time. I can hack this using a macro that calls EVAL, or by hacking the CL-WHO code to add another specially handled symbol, but before diving into that rabbit hole I thought I'd ask if there was already a way of doing this that I've overlooked. Thanks, rg

4 5

[cl-who-devel] Transforming quoted lists
by Joubert Nel 21 Dec '09

21 Dec '09

Hi - How can I get WITH-HTML-OUTPUT-TO-STRING to transform lists that are quoted? e.g. this works fine (not quoted): (with-html-output-to-string (out nil) (:div "test")) but, how can I get cl-who to transform if the body is quoted: with-html-output-to-string (out nil) '(:div "test")) Joubert Nel Workstax http://www.workstax.com The Corporate Grapevine Separate the important from the irrelevant

2 1

[cl-who-devel] Generating html tree with dynamic structure
by Dmitry V'yal 24 Nov '09

24 Nov '09

Hello anyone, I have a simple problem, but I can't find an elegant solution. Basically I have a message and two flags, the first one signals message should be rendered in tag and the second - in <italic>. So there are four possibilities. Here is the actual code: (defmethod p-render-html ((s-tree tree) (p text-piece) s) (with-html-output (s nil :prologue nil) (let ((style (style-of p)) (txt (text-of p))) (if style (if (tree-find-prop s-tree style #'bold) (htm (:strong (if (tree-find-prop s-tree style #'italic) (htm (:italic (str txt))) (str txt)))) (if (tree-find-prop s-tree style #'italic) (htm (:italic (str txt))) (str txt))) (str txt))))) I had to test for each case and it resulted in code duplication. Can it be avoided? What if I had 5 flags or so?

3 3

[cl-who-devel] mod_lisp and cl-who, beginner's question
by Marko Riedel 01 Oct '09

01 Oct '09

Dear friends, I am a beginner when it comes to Lisp although I have some experience with Scheme. I would eventually like to use cl-who to serve web pages on a Debian system. Here is the signature of my web server: Apache/2.2.9 (Debian) mod_lisp2/1.3.1 PHP/5.2.6-1+lenny3 with Suhosin-Patch mod_ssl/2.2.9 OpenSSL/0.9.8g Server at lisptest Port 80 I tried the following simple program: (format *modlisp-socket* "~a~%" "HTTP/1.1 200 OK") (format *modlisp-socket* "~a~%~%" "Content-Type: text/html") (format *modlisp-socket* "~a~%" "<HTML><BODY>Hello, world.</BODY></HTML>") My problem is, this program produces a timeout and the webserver gives up after a certain time. This is what the web server writes to the log file: [Wed Sep 30 23:30:00 2009] [error] \ (70007)The timeout specified has expired: error reading from Lisp Nonetheless the webserver and the Lisp process are talking to each other, as shown by the following TCP dump: 23:29:00.163187 IP localhost.localdomain.49120 > localhost.localdomain.20123: P 97:758(661) ack 1 win 513 <nop,nop,timestamp 353883724 353883724> 0x0000: 4500 02c9 d6d5 4000 4006 6357 7f00 0001 E.....@.@.cW.... 0x0010: 7f00 0001 bfe0 4e9b ce5d 00ea ce43 bee2 ......N..]...C.. 0x0020: 8018 0201 00be 0000 0101 080a 1517 d64c ...............L 0x0030: 1517 d64c 0a38 300a 7265 6d6f 7465 2d69 ...L.80.remote-i 0x0040: 702d 6164 6472 0a31 3239 2e36 392e 3131 p-addr.129.69.11 0x0050: 362e 310a 7363 7269 7074 2d66 696c 656e 6.1.script-filen 0x0060: 616d 650a 2f61 6673 2f2e 6d61 7468 656d ame./afs/.mathem 0x0070: 6174 696b 2e75 6e69 2d73 7475 7474 6761 atik.uni-stuttga 0x0080: 7274 2e64 652f 7072 6f6a 6563 742f 6c69 rt.de/project/li 0x0090: 7370 2f73 696d 706c 652e 6c69 7370 0a72 sp/simple.lisp.r 0x00a0: 656d 6f74 652d 6970 2d70 6f72 740a 3432 emote-ip-port.42 0x00b0: 3934 320a 7365 7276 6572 2d69 640a 6c6f 942.server-id.lo 0x00c0: 6361 6c68 6f73 740a 7365 7276 6572 2d62 calhost.server-b 0x00d0: 6173 6576 6572 7369 6f6e 0a41 7061 6368 aseversion.Apach 0x00e0: 652f 322e 322e 380a 6d6f 646c 6973 702d e/2.2.8.modlisp- 0x00f0: 7665 7273 696f 6e0a 312e 332e 310a 6d6f version.1.3.1.mo 0x0100: 646c 6973 702d 6d61 6a6f 722d 7665 7273 dlisp-major-vers 0x0110: 696f 6e0a 320a 486f 7374 0a6c 6973 7074 ion.2.Host.lispt 0x0120: 6573 740a 5573 6572 2d41 6765 6e74 0a4d est.User-Agent.M 0x0130: 6f7a 696c 6c61 2f35 2e30 2028 5831 313b ozilla/5.0.(X11; 0x0140: 2055 3b20 4c69 6e75 7820 6936 3836 3b20 .U;.Linux.i686;. 0x0150: 656e 2d55 533b 2072 763a 312e 382e 302e en-US;.rv:1.8.0. 0x0160: 3133 7072 6529 2047 6563 6b6f 2f32 3030 13pre).Gecko/200 0x0170: 3730 3530 3520 4963 6561 7065 2f31 2e30 70505.Iceape/1.0 0x0180: 2e39 2028 4465 6269 616e 2d31 2e30 2e31 .9.(Debian-1.0.1 0x0190: 317e 7072 6530 3731 3032 322d 3065 7463 1~pre071022-0etc 0x01a0: 6831 290a 4163 6365 7074 0a74 6578 742f h1).Accept.text/ 0x01b0: 786d 6c2c 6170 706c 6963 6174 696f 6e2f xml,application/ 0x01c0: 786d 6c2c 6170 706c 6963 6174 696f 6e2f xml,application/ 0x01d0: 7868 746d 6c2b 786d 6c2c 7465 7874 2f68 xhtml+xml,text/h 0x01e0: 746d 6c3b 713d 302e 392c 7465 7874 2f70 tml;q=0.9,text/p 0x01f0: 6c61 696e 3b71 3d30 2e38 2c69 6d61 6765 lain;q=0.8,image 0x0200: 2f70 6e67 2c2a 2f2a 3b71 3d30 2e35 0a41 /png,*/*;q=0.5.A 0x0210: 6363 6570 742d 4c61 6e67 7561 6765 0a65 ccept-Language.e 0x0220: 6e2d 7573 2c65 6e3b 713d 302e 350a 4163 n-us,en;q=0.5.Ac 0x0230: 6365 7074 2d45 6e63 6f64 696e 670a 677a cept-Encoding.gz 0x0240: 6970 2c64 6566 6c61 7465 0a41 6363 6570 ip,deflate.Accep 0x0250: 742d 4368 6172 7365 740a 4953 4f2d 3838 t-Charset.ISO-88 0x0260: 3539 2d31 2c75 7466 2d38 3b71 3d30 2e37 59-1,utf-8;q=0.7 0x0270: 2c2a 3b71 3d30 2e37 0a4b 6565 702d 416c ,*;q=0.7.Keep-Al 0x0280: 6976 650a 3330 300a 436f 6e6e 6563 7469 ive.300.Connecti 0x0290: 6f6e 0a6b 6565 702d 616c 6976 650a 5072 on.keep-alive.Pr 0x02a0: 6167 6d61 0a6e 6f2d 6361 6368 650a 4361 agma.no-cache.Ca 0x02b0: 6368 652d 436f 6e74 726f 6c0a 6e6f 2d63 che-Control.no-c 0x02c0: 6163 6865 0a65 6e64 0a ache.end. The relevant configuration data from the virtual host container are as follows: LispServer 127.0.0.1 20123 "localhost" AddHandler lisp-handler .lsp .lisp <Directory /> AllowOverride All Order deny,allow Deny from all Allow from all </Directory> My question to the list is, what is causing this timeout? Is the socket not being flushed? Why are there no data being sent from the Lisp process after it receives the headers from the web server? Thanks for any comments you may have. Best regards, Marko Riedel

2 1

[cl-who-devel] Building a table from a list of strings - Can't seem to get it right
by Bryan Emrys 17 Jun '09

17 Jun '09

Looking at the checkerboard-like example in the docs and trying to figure out how to get a table from a list of strings. Assume a list of 50 strings and I want to get them into a table that is 5 cells wide and 10 high. I can't seem to get the loop(s) right with the rows. I can do this without cl-who, but there should be an obvious method that I'm missing to be able to do this with cl-who. I apparently don't know enough loop-fu. Any pointers would be appreciated. Bryan

4 5

[cl-who-devel] str and esc inconsistency (suggestion)
by Jan Rychter 03 Jun '09

03 Jun '09

I have a suggestion for CL-WHO. Currently, you can't just replace str with esc in your code, because while str does a princ, esc expects a string. I have code that passes numbers to str and wanted to do a wholesale replacement. The manual says: str: Forms that look like (str form1 form*) will be substituted with (let ((result form1)) (when result (princ result s))) esc: Forms that look like (esc form1 form*) will be substituted with (let ((result form1)) (when result (write-string (escape-string result s)))). I would suggest improving esc by performing a princ if the first argument is not a string. --J.

2 1

Re: [cl-who-devel] Regression in indentation
by Edi Weitz 06 Apr '09

06 Apr '09

2009/3/14 Slawek Zak <slawek.zak(a)gmail.com>: > Latest cl-who from bknr.net repo introduced neted html indentation bug: Hi Slawek, Thanks for the report. This is just to acknowledge that I see the problem as well, but I don't have an easy fix for this. If someone else has, please step forward... :) Cheers, Edi.

1 0

None
by None 14 Mar '09

14 Mar '09

1 0

[cl-who-devel] regression for *attribute-quote-char* in cl-who-0.11.1
by Andrei Stebakov 09 Mar '09

09 Mar '09

in cl-who-0.11.0 the *attribute-quote-char* works well: (let ((cl-who:*attribute-quote-char* #\")) (with-html-output-to-string (*standard-output* nil :prologue nil :indent nil) (:p :onmouseover "func()"))) produces: "" in cl-who-0.11.1 it produces "" Thank you, Andrei

2 1

[cl-who-devel] Sharing indentation info
by Slawek Zak 05 Mar '09

05 Mar '09

Hi, I'd like to propose a small patch to cl-who, which allows for *indent* retention across function calls. Regards, /S

2 1

[cl-who-devel] Double sexp tree traversal
by Slawek Zak 05 Mar '09

05 Mar '09

Hi, Is it necessary to walk the tree two times in cl-who? CL-USER> (cl-who:with-html-output-to-string (*standard-output*) (:one (:two))) 0[7]: (CL-WHO::TREE-TO-TEMPLATE ((:ONE (:TWO)))) 1[7]: (CL-WHO::PROCESS-TAG (:ONE (:TWO)) #<Function TREE-TO-TEMPLATE>) 2[7]: (CL-WHO::TREE-TO-TEMPLATE ((:TWO))) 3[7]: (CL-WHO::PROCESS-TAG (:TWO) #<Function TREE-TO-TEMPLATE>) 3[7]: returned ("<" "two" ">" "</" "two" ">") 2[7]: returned ("<" "two" ">" "</" "two" ">") 1[7]: returned ("<" "one" ">" "<" "two" ">" "</" "two" ">" "</" "one" ">") 0[7]: returned ("<" "one" ">" "<" "two" ">" "</" "two" ">" "</" "one" ">") 0[7]: (CL-WHO::TREE-TO-TEMPLATE ((:ONE (:TWO)))) 1[7]: (CL-WHO::PROCESS-TAG (:ONE (:TWO)) #<Function TREE-TO-TEMPLATE>) 2[7]: (CL-WHO::TREE-TO-TEMPLATE ((:TWO))) 3[7]: (CL-WHO::PROCESS-TAG (:TWO) #<Function TREE-TO-TEMPLATE>) 3[7]: returned ("<" "two" ">" "</" "two" ">") 2[7]: returned ("<" "two" ">" "</" "two" ">") 1[7]: returned ("<" "one" ">" "<" "two" ">" "</" "two" ">" "</" "one" ">") 0[7]: returned ("<" "one" ">" "<" "two" ">" "</" "two" ">" "</" "one" ">") I use version: $Header: /usr/local/cvsrep/cl-who/who.lisp,v 1.36 2008/03/27 23:17:55 edi Exp Thanks, /S

2 2

[cl-who-devel] Doc correction and a question
by Ala'a (cmo-0) 04 Dec '08

04 Dec '08

Hi, i was reading the documentation for cl-who library and i have a question in the 'syntax and semantics', it said: "The first form following either the tag's name itself or an attribute value which is not a keyword determines the beginning of the tag's content. **This and all the following forms are subject to the transformation rules we're just describing**." (the stars are added by me) my question is: what are the rules which will be applied to the content? if it is the previous rules regarding constants, tags and attr/val then shouldn't the content be printed by princ at runtime? other thing i noticed in the line: "Forms that look like (esc form1 form*) will be substituted with (let ((result form1)) (when result (write-string (escape-string result s)))). " shouldn't the last code snippet be like this: (let ((result form1)) (when result (write-string (escape-string result) s))) the last s should be shifted forward one parentheses regards, and thanks for the nice library and documentation combined! Ala'a (cmo-0) -- It does not matter how fast your code is, if it does not work! -- It does not matter how fast your code is, if it does not work!

1 0

[cl-who-devel] Case sensitivity idea
by Ken Harris 03 Nov '08

03 Nov '08

Hi again, I'm using cl-who for generating a lot of HTML and lowercase XML, and a tiny bit of mixed-case XML. (I don't know who thought up mixed-case XML schemas, but I swear it's not my fault. For that matter, neither is the XML. :-) To generate mixed-case XML, I should turn off *downcase-tokens-p*, and then wrap every existing :foo like :|foo| in all my cl-who calls, just to be able to generate a couple mixedCase XML attributes. This idea doesn't thrill me. (Or I could change the readtable-case, but that'll mean changing all my code to upper-case, and I'm not excited about that, either.) What if there was another mode (call it, say, *downcase-tokens-unless-mixedcase-p*) for case handling, whose rule was: - "downcase tokens, *unless* the token's string representation is mixed-case (in which case leave it alone)" That way, I could say (:a :href "/foo") like normal, but also (:|feGaussianBlur| :|stdDeviation| 2), and everything would work like it looks and like I want. I suppose it would be impossible to generate all-uppercase tags in this mode, but (a) I don't think I've ever seen an XML schema that required any all-caps tags, and (b) in *downcase-tokens-p* mode, there are tags it's impossible to generate, so I'm thinking "any tag in any mode" isn't a strict requirement. Thoughts? I could whip up a patch, if somebody else thought this was a decent approach... - Ken

3 3

[cl-who-devel] Specifying prologues (and a digression into special variables)
by Ken Harris 27 Oct '08

27 Oct '08

Hi, I'm using cl-who for a project where I want to generate 2 kinds of XML, and each has their own prologue. I started by passing these as literals to the keyword parameter :prologue, but I'd like to pull them out into constants, and eventually one will need to be computed at runtime. At first, I tried just passing an expression to :prologue, but that obviously failed (because defmacro evaluates it at macroexpand-time, not run-time, I think): (defconstant +my-prologue+ "header") (with-html-output-to-string (s nil :prologue +my-prologue+) (:a)) => " <a></a>" Then I went and read Erann Gat's "Idiot's Guide to Special Variables". It doesn't mention macros, but I figured I could get close with something like this, but no, it ignores my *prologue* setting: (let ((*prologue* "header")) (with-html-output-to-string (s nil :prologue t) (:a))) => "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\"> <a></a>" So obviously I'm missing the boat on special variables and defmacro. I know I could just setq *prologue* before calling cl-who (or even cruder approaches), but that seems awkward, and I'd like to learn what's going on with special variables and macros. As an aside, special variables and macros aren't behaving the same in my 2 Lisp implementations (all of the above is with SBCL), so it seems that at least somebody out there thinks the same way as me: :-) (defvar *special* 5) (defun show-special () *special*) (defmacro with-special () *special*) (show-special) (let ((*special* 10)) (show-special)) (with-special) (let ((*special* 10)) (with-special)) ;; CLISP 2.43: 5, 10, 5, 10 ;; SBCL 1.0.13: 5, 10, 5, 5 If anybody could shed some light on this, and show how to most naturally use an expression as a :prologue with cl-who, it'd be much appreciated. Thanks! - Ken

2 2

[cl-who-devel] Vertical whitespace
by Robin Lee Powell 12 Oct '08

12 Oct '08

Is it possible to control production of vertical whitespace in cl-who output? Having everything on one line gets really old after a while. -Robin -- They say: "The first AIs will be built by the military as weapons." And I'm thinking: "Does it even occur to you to try for something other than the default outcome?" -- http://shorl.com/tydruhedufogre http://www.digitalkingdom.org/~rlpowell/ *** http://www.lojban.org/

2 2

[cl-who-devel] Looks like a bug to me?
by Robin Lee Powell 29 Sep '08

29 Sep '08

(require 'cl-who) (use-package 'cl-who) (let ((userid 46)) (with-html-output (*standard-output*) (:a :id 7) (str (format nil "~%")) (:a :id "7") (str (format nil "~%")) (:a :id (str userid)))) I'm sure there's some better way to get newlines in the output. Anyways, output is: <a id='7'></a> <a id='7'></a> <a46 id='46'></a> That last one is really staggeringly wrong. Is it me or the code? -Robin -- Lojban Reason #17: http://en.wikipedia.org/wiki/Buffalo_buffalo Proud Supporter of the Singularity Institute - http://singinst.org/ http://www.digitalkingdom.org/~rlpowell/ *** http://www.lojban.org/

3 3

[cl-who-devel] loop problem
by Jens Teich 27 Sep '08

27 Sep '08

I need this expression for creation of a macro: WEBCAT 24 > (WITH-HTML-OUTPUT (*STANDARD-OUTPUT*) (LOOP FOR ITEM IN '((FMT "12") (FMT "13")) DO (HTM (:TD ITEM)))) <td></td><td></td> NIL how do I have to correct the expression so that the output is <td>12</td><td>13</td> NIL Jens

2 2

[cl-who-devel] New invitation from Paul Thirumalai
by Paul Thirumalai 05 Sep '08

05 Sep '08

You have been invited to connect as friends with Paul Thirumalai <paul.thirumalai(a)gmail.com> Please accept or reject this invitation by clicking below: http://www.bebo.com/in/7750480851a673686173b135 ...................................................................... Please do not reply directly to this email. This email was sent to you at the direct request of Paul Thirumalai <paul.thirumalai(a)gmail.com>. You have not been added to a mailing list. If you would prefer not to receive invitations from ANY Bebo members please click here - http://www.bebo.com/unsub/7750480851a673686173 Bebo, Inc., 795 Folsom St, 6th Floor, San Francisco, CA 94107, USA.

1 0

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

cl-who-devel