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

Refactor, but not fix, origami-next-fold

Browse Source
This commit is contained in:
Greg Sexton 2014-08-11 21:58:46 +01:00
parent af44495352
commit 3de4a8513b
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
origami.el
View File

@ -449,8 +449,7 @@ a fold, move to the end of the fold that point is in."
(-> tree (-> tree
(origami-fold-postorder-reduce (lambda (state n) (origami-fold-postorder-reduce (lambda (state n)
(cons (origami-fold-end n) state)) nil) (cons (origami-fold-end n) state)) nil)
(->> (-reduce (lambda (state pos) (->> (-last (lambda (pos) (> pos point))))
(if (<= pos point) state pos))))
goto-char))) goto-char)))
(defun origami-reset (buffer) (defun origami-reset (buffer)