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))