<div dir="ltr">This works:<br>(in-package :cl-user)<br>(let* ((txt1 "hallo")<br>        (txt2 "yellow"))<br>  (cl-who:show-html-expansion (str nil :indent t) <br>    ((:a) txt1 txt2)))<br><br>This does not work and hell breaks out when compiling:<br>
(defpackage :dummy-package<br>
  (:use :cl :cl-user :cl-who))<br>
(in-package :dummy-package)<br>(let* ((txt1 "hallo")<br>
        (txt2 "yellow"))<br>
  (cl-who:show-html-expansion (str nil :indent t) <br>
    ((:a) txt1 txt2)))<br>==><br>(LET ((STR STR))<br>  (PROGN<br>   (WRITE-STRING "<br><a><br>  "<br>                 LET ((#:G1 NIL)) (WHEN #:G1 (PRINC #:G1 STR)))<br>   TXT1<br>   (WRITE-STRING "<br>
  "<br>                 LET ((#:G2 NIL)) (WHEN #:G2 (PRINC #:G2 STR)))<br>   TXT2<br>   (WRITE-STRING "<br></a>"<br>                 LET ((#:G3 NIL)) (WHEN #:G3 (PRINC #:G3 STR)))))<br><br>Well, I really don't get it with packages, so I just tried around and found<br>
that this code here works:<br>(defpackage :dummy-package<br>

  (:use :cl :cl-user :cl-who))<br>

(in-package :dummy-package)<br>
(let* ((txt1 "hallo")<br>

        (txt2 "yellow"))<br>

  (cl-who:show-html-expansion (s nil :indent t) <br>

    ((:a) txt1 txt2)))<br><br>So kind-of it's not the package alone the problem, somehow<br>it's the combination of package and using str in macro<br>Ha, just tried with fmt instead of str: same problem<br>Hint: Maybe no protection with gensym? And why does it work in cl-user?!?<br>
<br>Using cl-who-0.11.1<br><br>And yes, I was in hell...<br>And now (after changing str to s) I want just to understand what happend to me.<br>thanks<br>olli<br>
</div>