On Sat, Jul 09, 2011 at 07:36:39PM +0700, Henrik Sarvell wrote:
> I see, then we do like this instead:
> ...
>                        (when (cdr (setq L (split L "=")))
>                           (push '*Post (list (ht:Pack (car L)) (ht:Pack
> ...
> And then we can fetch values like this:
> 
> (de req (Key)
>    (cadr (assoc Key *Post)))

Yes. Or, if you want to stick with properties, something like

      (put '*Post
         (intern (ht:Pack (car L)))
         (ht:Pack (cadr L)) )

Cheers,
- Alex
-- 
UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe

Reply via email to