xeals/origami.el
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Adjust whitespace

Browse Source
This commit is contained in:
Greg Sexton 2014-03-17 20:25:10 +00:00
parent 7cc09a5acd
commit 3d727df657
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
origami.el
View File

@ -45,9 +45,13 @@
(origami-fold-node 0 0 t children)) (origami-fold-node 0 0 t children))
(defun origami-fold-beg (node) (aref node 0)) (defun origami-fold-beg (node) (aref node 0))
(defun origami-fold-end (node) (aref node 1)) (defun origami-fold-end (node) (aref node 1))
(defun origami-fold-open-p (node) (aref node 2)) (defun origami-fold-open-p (node) (aref node 2))
(defun origami-fold-children (node) (aref node 3)) (defun origami-fold-children (node) (aref node 3))
(defun origami-fold-data (node &optional data) (defun origami-fold-data (node &optional data)
"With optional param DATA, add or replace data. This cannot be "With optional param DATA, add or replace data. This cannot be
used to nil out data. This mutates the node." used to nil out data. This mutates the node."
@ -96,7 +100,6 @@ been added and ON-REMOVE for nodes that have been removed."
(diff-children (origami-fold-children old) (diff-children (origami-fold-children old)
(origami-fold-children new)))) (origami-fold-children new))))
(defun origami-fold-postorder-each (node f) (defun origami-fold-postorder-each (node f)
(-each (origami-fold-children node) f) (-each (origami-fold-children node) f)
(funcall f node)) (funcall f node))