Re: message registry for Gnus

[Andreas Fuchs <asf@void.at>]

Today, Ted Zlatanov <tzz@lifelogs.com> wrote:
> Could something like hashtable-to-alist-string and
> hashtable-from-alist-string be added to the Gnus core?  It would make
> my life easier, and I'm definitely not the person to write reliable
> versions of these functions :)  

Me neither, but will these help:

(defun alist-to-hashtable (alist)
  "Build a hashtable from the values in ALIST."
  (let ((ht (make-hash-table)))
    (mapc
     (lambda (kv-pair)
       (puthash (car kv-pair) (cdr kv-pair) ht))
     alist)
     ht))

(defun hashtable-to-alist (hash)
  "Build an alist from the values in HASH."
  (let ((list nil))
    (maphash
     (lambda (key value)
       (setq list (cons (cons key value) list))))))

;;? You will of course have to use (read) and (format) accordingly. (-:

> Serialization would be a wonderful feature for Emacs Lisp in general.

Absolutely.

Have fun,
-- 
Andreas Fuchs, <asf@acm.org>, asf@jabber.at, antifuchs
irc.freenode.net's #emacs - online emacs advice from IRC addicts