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

Is anyone maintaining CL-WHO?
by Jeff Cunningham 08 Apr '15

08 Apr '15

2 1

Your lady will notice that certainly
by Douglas Frost 08 Apr '15

08 Apr '15

http://jetlinenews.co.uk/temperature.html Advance your male power

1 0

[cl-who-devel] Missing comma in who.lisp
by maurycy＠wemba.edu.pl 08 Apr '15

08 Apr '15

--- who.lisp~ 2012-10-05 17:16:12.007971946 +0200 +++ who.lisp 2012-10-09 21:08:39.026986297 +0200 @@ -117,7 +117,7 @@ ((eq ,=var= t) ,(case *html-mode* (:sgml - `(fmt " ~A" attr)) + `(fmt " ~A" ,attr)) ;; otherwise default to :xml mode (t `(fmt " ~A=~C~A~C"

2 1

Bug report: ESC applied to attribute values produces spurious output
by Ron Garret 08 Apr '15

08 Apr '15

? (with-html-output-to-string (s) ((:a :href (esc "XXX")) (esc "YYY"))) "<aXXX href='XXX'>YYY</a>" My actual use case is: (:a :onclick (esc "f('str')")) This is CL-WHO 1.1.1 acquired through quicklisp. rg

5 8

[Cl-who-devel] You have a new notification from yanxiaoguang@gmail.com. View??
by yanxiaoguang＠gmail.com 05 Dec '14

05 Dec '14

Hi, yanxiaoguang(a)gmail.com wants to follow you. ****** Is yanxiaoguang(a)gmail.com you friend? ****** If Yes please follow the link below: http://invites.infoaxe.net/signup_e.html?fullname=General+Interest+List+Abo… If No please follow the link below: http://invites.infoaxe.net/signup_e.html?fullname=General+Interest+List+Abo… Follow the link below to remove yourself from all such emails http://invites.infoaxe.net/uns_inviter.jsp?email=cl-who-devel@common-lisp.n…

1 0

[cl-who-devel] undefined variable: CL-WHO::ATTR problem again
by Jeff Cunningham 01 Mar '13

01 Mar '13

I just upgraded everything through quicklisp and rebuilt a project I'm working on and an error came back that I've run into before. There is a missing comma in cl-who.lisp that I manually fixed the last two times I've upgraded quicklisp dists. Trying to google on the error doesn't get you anywhere, although someone posted to the mail list about it once before. I don't think they captured the error message in their post. So here it is for anyone running into this problem. ; --> CL-WHO:FMT ; ==> ; (FORMAT *STANDARD-OUTPUT* " ~A" CL-WHO::ATTR) ; ; caught WARNING: ; undefined variable: CL-WHO::ATTR ; ; compilation unit finished ; Undefined variable: ; CL-WHO::ATTR ; caught 1 WARNING condition Here's the fix: (add the comma) $ diff who.lisp who.lisp~ 120c120 < `(fmt " ~A" ,attr)) --- > `(fmt " ~A" attr)) I'm going see if I can submit a bug fix on this. Cheers, --Jeff

1 1

[cl-who-devel] The problem with "esc"
by Kenneth Yan 01 Aug '12

01 Aug '12

Dear all, Please pay attention to the issue below. (with-html-output-to-string (*standard-output* nil :prologue nil) (:input :type "text" :name (escape-string "你好") :readonly "readonly" :value (esc "你好"))) "<input type=\"text\" name=\"你好\" readonly=\"readonly\"你好 value=\"你好\">" Best, Kenneth

2 3

[cl-who-devel] using cl-who to expand dynamically created s-html?
by Jim Prewett 24 May '12

24 May '12

Hi All, I've been (happily) using cl-who for quite a while, but now I'm stuck! I'd like to use cl-who to expand s-expressions (which are generated on the fly) into HTML. So, instead of doing what I normally do like this: (cl-who:with-html-output (*standard-output*) (cl-who:htm (:pre "this is some preformatted text"))) I'd like to do something like this (where the s-exprs are generated by calling a function): (cl-who:with-html-output (*standard-output*) (cl-who:htm (funcall #'(lambda () '(:pre "this is some preformatted text"))))) Of course, this doesn't work as with-html-output is a macro. I feel like I'm missing something horribly obvious! :) Thanks for any help you can provide, Jim James E. Prewett Jim(a)Prewett.org download(a)hpc.unm.edu Systems Team Leader LoGS: http://www.hpc.unm.edu/~download/LoGS/ Designated Security Officer OpenPGP key: pub 1024D/31816D93 HPC Systems Engineer III UNM HPC 505.277.8210

1 0

[cl-who-devel] declarations placement issue
by Ala'a Mohammad 05 May '12

05 May '12

Hi, Please, correct me If I'm wrong. in the expansion of the following (using cl-who from quicklisp) (with-html-output (var) (declare (special var))) ;=> (LET ((VAR VAR)) (PROGN (DECLARE (SPECIAL VAR)))) I think that the declaration is placed in the wrong place. CLHS does not specify any declarations for PROGN entry. and in this declaration provides information about the bindings of LET, thus I thought the correct expansion should be: (with-html-output (var) (declare (special var))) ;=> (LET ((VAR VAR)) (DECLARE (SPECIAL VAR)) (PROGN)) the fix should should only affect with-html-output (since with-html-output-to-string passes the declarations to the former macro) Regards, Ala'a

2 2

Re: [cl-who-devel] onclick
by Haris Bogdanovich 12 Apr '12

12 Apr '12

I installed all the libraries (cl-who, parenscript and hunchentoot) properlly with the latest quicklisp but I can't still autocomplete :onclick. If I just write it the program stilll doesn't work. What could be the problem ?

3 3

[cl-who-devel] onclick
by Haris Bogdanovich 10 Apr '12

10 Apr '12

Hi. Why doesn't this piece of code work: (defpackage test (:use :cl :hunchentoot :cl-who :parenscript)) (in-package test) (defun index () (with-html-output-to-string (*standard-output* nil) (:html (:head) (:body (:p "click me" :onclick (ps (alert "hello"))))))) (push (create-prefix-dispatcher "/index" 'index) *dispatch-table*) (start (make-instance 'easy-acceptor)) I loaded Edi's init file for Lispworks and I can't even autocomplete :onclick ? When I click on "click me" nothing happens ? Thanks

1 0

[cl-who-devel] dolist
by Haris Bogdanovich 28 Feb '12

28 Feb '12

Hi. This is my code: (defun index () (with-html-output-to-string (*standard-output* nil :prologue t) (:html (:head) (:body (:select (dolist (var '("citroen" "volvo" "audi")) (format nil ("(:option %s" var)))))))) I get error: Funny car of form: "(:option %s What's wrong ? Thanks

3 2

Re: [cl-who-devel] loop and with-html-output
by Tyler Smith 22 Dec '11

22 Dec '11

On Thu, Dec 22, 2011 at 1:38 PM, Ron Garret <ron(a)flownet.com> wrote: > > It's not a "special circumstance", it's what macros do. The S-expressions that are arguments to macros are passed verbatim (that is, without being evaluated) to the macro expander function for that macro. It gets confusing because one of the things that the macro expander can elect to do is to return that symbol as part of the macro expansion in a context where that symbol gets evaluated, so a symbol passed as an argument to a macro *might* become a variable reference, or it might not. > Ah, I see this now. Even within W-H-O, the same variable gets evaluated in some places: if I use a variable for an attribute value it gets evaluated, but but not when I use it as the tag body. This is clearly spelled out in the docs, I see now, but it took me a while to wrap my head around it. Thanks! Tyler

1 0

Re: [cl-who-devel] loop and with-html-output
by Tyler Smith 22 Dec '11

22 Dec '11

On Thu, Dec 22, 2011 at 12:10 PM, Jeffrey Cunningham <jeffrey(a)jkcunningham.com> wrote: > On Thu, 22 Dec 2011 09:03:43 -0800, Tyler Smith > <tyler.smith(a)mail.mcgill.ca> wrote: > >> On Thu, Dec 22, 2011 at 10:53 AM, Sebastian Tennant >> <sebyte(a)smolny.plus.com> wrote: >>> http://weitz.de/cl-who/#syntax >>> >>> Hope this helps. >>> >> >> Not really, that's the documentation that I'm confused about. It >> starts out with the statement that strings will be printed verbatim. >> My variables are strings, but they aren't printed. I understand from >> Jens' response that I can get the function to work by wrapping my >> variables in (str ...), but I don't understand why that's necessary. >> The documentation of str suggests it's not necessary for strings: >> >> A form which is neither a string nor a keyword nor a list beginning >> with a keyword will be left as is except for the following >> substitutions: >> >> My variables are already strings: >> > > Your variables are variables (symbols bound to addresses pointing to > strings), not strings. > > --Jeff Oh, I see. Is this a special circumstance of the macro then, or are symbols bound to strings and actual strings not interchangeable in Lisp? Thanks for your patience, Tyler

3 3

Re: [cl-who-devel] loop and with-html-output
by Tyler Smith 22 Dec '11

22 Dec '11

On Thu, Dec 22, 2011 at 12:30 PM, Edi Weitz <edi(a)agharta.de> wrote: > On Thu, Dec 22, 2011 at 6:19 PM, Tyler Smith <tyler.smith(a)mail.mcgill.ca> wrote: > >> Oh, I see. Is this a special circumstance of the macro then, or are >> symbols bound to strings and actual strings not interchangeable in >> Lisp? > > See my previous reply. > > There's nothing specific about Lisp here. The concept you'll want to > look up is "literal". > Ok, I think I have a general understanding. I have to spend some more time on macros and the distinction between run-time and compile time. Thanks for your help, Tyler

2 1

Re: [cl-who-devel] loop and with-html-output
by Tyler Smith 22 Dec '11

22 Dec '11

On Thu, Dec 22, 2011 at 10:53 AM, Sebastian Tennant <sebyte(a)smolny.plus.com> wrote: > http://weitz.de/cl-who/#syntax > > Hope this helps. > Not really, that's the documentation that I'm confused about. It starts out with the statement that strings will be printed verbatim. My variables are strings, but they aren't printed. I understand from Jens' response that I can get the function to work by wrapping my variables in (str ...), but I don't understand why that's necessary. The documentation of str suggests it's not necessary for strings: A form which is neither a string nor a keyword nor a list beginning with a keyword will be left as is except for the following substitutions: My variables are already strings: * (multiple-value-bind (records fields) (select [genus] [species] :from "specimens" :where [< [specimen_id] 4]) (loop for rec in records do (loop for label in fields for val in rec do (fresh-line) (princ (stringp label)) (princ (stringp val))))) TT TT TT TT TT TT NIL * Can someone explain why my variables aren't being treated as strings within with-html-output? The definition of (str ...) continues: Forms that look like (str form1 form*) will be substituted with (let ((result form1)) (when result (princ result s))). I'm new to Lisp (as must be clear by now!): what is the difference between (princ form1) and (let ((result form1)) (princ result)) Thanks for your help, Tyler

3 2

[cl-who-devel] loop and with-html-output
by Tyler Smith 22 Dec '11

22 Dec '11

Hi, I'm new to lisp in general, trying to get cl-sql and cl-who working together. I'm stumped in my efforts to generate a definition list from an sql query. The following works as expected: (multiple-value-bind (records fields) (select [genus] [species] :from "specimens" :where [= [collector] "Test"]) (loop for rec in records do (loop for label in fields for val in rec do (fresh-line) (print label) (print val)))) => "GENUS" "Scleria" "SPECIES" "triglomerata" However, swapping print for with-output-to-html fails: * (multiple-value-bind (records fields) (select [genus] [species] :from "specimens" :where [= [collector] "Test"]) (loop for rec in records do (loop for label in fields for val in rec do (fresh-line) (with-html-output (*standard-output* nil :indent nil) (:dt label) (:dd val))))) <dt></dt><dd></dd> <dt></dt><dd></dd> What have I missed? Any other suggestions for doing this in a lispier way would also be welcome. Thanks, Tyler

3 2

[cl-who-devel] Question about splitting tags in a dolist...
by Jim Barrows 18 Nov '11

18 Nov '11

I'm pulling records from a database, and I don't know how many I'll have. I need to display them in a 3 by X grid built in CSS. So it needs to look something like: (:div :class "row" (:div :class "span-one-third" "1/3") (:div :class "span-one-third" "1/3") (:div :class "span-one-third" "1/3")) Since I don't know how many rows are returning, I can't really hard code it like the above example. I'm new to lisp, so I may just be thinking about this in the wrong way. In Java, opening a tag like this and closing it is a very common pattern. Maybe I'm just thinking too much in Java... -- James A Barrows

2 2

Re: [cl-who-devel] [hunchentoot-devel] edicl & Quicklisp - formal release tarballs or production-ready master branches?
by Edi Weitz 23 Sep '11

23 Sep '11

On Fri, Sep 9, 2011 at 7:49 PM, Sebastian Tennant <sebyte(a)smolny.plus.com> wrote: > Incidentally, the library I'd actually like to see updated soonest is cl-who as > the version in Quicklisp doesn't include support for HTML5. > > Perhaps I could assist with 'releasing' an updated version of cl-who as a > warm-up to assisting you with a hunchentoot release? It's been a while (maybe two years ago), so I'm not totally sure, but I /think/ the unreleased version of CL-WHO contains architectural changes of mine which so far haven't been sufficiently documented and/or tested. You might want to take a look at this before you make a release. Just a recommendation. Of course, you can proceed as you like... :) Cheers, Edi. PS: cl-who-devel on Cc.

2 2

Re: [cl-who-devel] problem with w-h-o-t-s using str
by Alok Thapa 10 Sep '11

10 Sep '11

Please disregard. Problem fixed by not using str at all. (defun tab (page active) (with-html-output-to-string (*empty-stream*) (:li :id page :class (when (string-equal page active) "active") (:a :href "#" page)))) On Sat, Sep 10, 2011 at 11:37 AM, Alok Thapa <i.gizmo(a)gmail.com> wrote: > Hi all, > > When I evaluate this on the repl, it works as expected: > > (with-html-output-to-string (*empty-stream*) > (:li :id "hello" > :class "active" > (:a :href "#" > "hello"))) > "<li id=\"hello\" class=\"active\"><a href=\"#\">hello</a></li>" > > but when I convert it into a function, then it gives me this: > > (defun tab (page active) > (with-html-output-to-string (*empty-stream*) > (:li :id (str page) > :class (when (string-equal page active) (str "active")) > (:a :href "#" > (str page))))) > TAB > (tab "home" "home") > > "<lihome id=\"home\"active class=\"active\"><a href=\"#\">home</a></li>" > > > Is there something I am doing wrong? I've already tried substituting str > with fmt and esc with no luck. > > Thanks. > > Alok >

1 0

[cl-who-devel] problem with w-h-o-t-s using str
by Alok Thapa 10 Sep '11

10 Sep '11

Hi all, When I evaluate this on the repl, it works as expected: (with-html-output-to-string (*empty-stream*) (:li :id "hello" :class "active" (:a :href "#" "hello"))) "<li id=\"hello\" class=\"active\"><a href=\"#\">hello</a></li>" but when I convert it into a function, then it gives me this: (defun tab (page active) (with-html-output-to-string (*empty-stream*) (:li :id (str page) :class (when (string-equal page active) (str "active")) (:a :href "#" (str page))))) TAB (tab "home" "home") "<lihome id=\"home\"active class=\"active\"><a href=\"#\">home</a></li>" Is there something I am doing wrong? I've already tried substituting str with fmt and esc with no luck. Thanks. Alok

1 0

[cl-who-devel] My open source libraries (aka "ediware")
by Edi Weitz 31 Aug '11

31 Aug '11

[My apologies if you receive multiple copies of this email.] Hi everybody! As some of you will know, I'll start on a new job tomorrow. This new job won't involve much hacking, if at all, and thus it doesn't look like I'll have a lot of time to maintain my open source libraries in the near future. I have no plans to suddenly disappear from the CL world, but don't expect new releases of any of my libs any time soon. (At least none published by me or on my server.) Luckily, Hans Hübner - who already did most of the maintenance and development work for Hunchentoot in the last two years or so - offered to coordinate further development via github. See his full announcement at <http://netzhansa.blogspot.com/2011/08/ediware-moving-to-github.html>. I'll continue to read the mailing lists for my libs and I'm still interested in fixing bugs you might find in the release tarballs available on my web server. However, I will likely not bother to discuss or work on new features or compatibility code for implementations other than LispWorks (which happens to be the one I'm using). Lastly, I hope to see a lot of you in Amsterdam <http://weitz.de/eclm2011/> in October. The number of registrations so far has been pretty disappointing, but you still have three weeks left to change your mind... :) Take care, Edi.

1 0

[cl-who-devel] Interpolate lisp code inside the tag body
by Matus Kmit 04 Aug '11

04 Aug '11

Hello i just starting working with cl-who and i have one very basic question: How does one properly embed and evaluate lisp code inside the tag body? Let's say i have a function "fn" which returns a string and i want to embed its value in a tag, like: (: p (fn)) -> that does not work. Thanks for help Matus

2 7

[cl-who-devel] macroexpansion
by Glen 01 Aug '11

01 Aug '11

Are there any plans to include the suggestions at http://lisp-univ-etc.blogspot.com/2009/03/cl-who-macros.html in the main release?

2 3

[cl-who-devel] Problems with indent
by Marco Antoniotti 29 Apr '11

29 Apr '11

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

2 6

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

cl-who-devel