[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: "push" creating circular objects
From: |
Charles Sebold |
Subject: |
Re: "push" creating circular objects |
Date: |
Wed, 20 Aug 2008 11:27:19 -0500 |
User-agent: |
Gnus/5.11 (Gnus v5.11) Emacs/22.2 (windows-nt) |
On 20 Aug 2008, Charles Sebold wrote:
> Here's the code in question:
>
> (defun Textile-list-context (textile-list-tag)
> "Return list of HTML tags corresponding to list context (ol, ul)."
> (let ((my-list nil))
> (dolist (this-tag (delete "" (split-string textile-list-tag "")))
> (cond
> ((string= this-tag "#")
> (push "ol" my-list))
> ((string= this-tag "*")
> (push "ul" my-list))))
> my-list))
I just changed it from push to append, with no change in behavior:
(defun Textile-list-context (textile-list-tag)
"Return list of HTML tags corresponding to list context (ol, ul)."
(let ((my-list nil))
(dolist (this-tag (delete "" (split-string textile-list-tag "")))
(cond
((string= this-tag "#")
(setq my-list (append (list "ol") my-list)))
((string= this-tag "*")
(setq my-list (append (list "ul") my-list)))))
my-list))
Arrgh. Anybody have any ideas?
--
Charles Sebold 20th of August, 2008
- "push" creating circular objects, Charles Sebold, 2008/08/21
- Re: "push" creating circular objects,
Charles Sebold <=
- Re: "push" creating circular objects, Charles Sebold, 2008/08/21
- Re: "push" creating circular objects, weber, 2008/08/20
- Re: "push" creating circular objects, weber, 2008/08/20
- Re: "push" creating circular objects, Charles Sebold, 2008/08/21
- Re: "push" creating circular objects, xraysmalevich, 2008/08/21
- Re: "push" creating circular objects, Charles Sebold, 2008/08/21
- Re: "push" creating circular objects, Pascal J. Bourguignon, 2008/08/21
- Re: "push" creating circular objects, Charles Sebold, 2008/08/21
Re: "push" creating circular objects, John Paul Wallington, 2008/08/21