Function: rcirc-rebuild-tree

rcirc-rebuild-tree is a byte-compiled function defined in rcirc.el.gz.

Signature

(rcirc-rebuild-tree TREE)

Documentation

Merge prefix TREE into alist of unique prefixes to buffers.

Source Code

;; Defined in /usr/src/emacs/lisp/net/rcirc.el.gz
(defun rcirc-rebuild-tree (tree)
  "Merge prefix TREE into alist of unique prefixes to buffers."
  (let ((ch (char-to-string (car tree)))
        acc)
    (dolist (x (cdr tree))
      (if (listp x)
          (setq acc (append acc
                            (mapcar (lambda (y)
                                      (cons (concat ch (car y))
                                            (cdr y)))
                                    (rcirc-rebuild-tree x))))
        (setq acc (cons (cons ch x) acc))))
    acc))