Correct macro name

'when-let' is a function which is introduced at Emacs 25. In this case,
'-when-let' of dash macro should be used.
This commit is contained in:
Syohei YOSHIDA 2016-07-11 00:28:01 +09:00
parent 1a957be171
commit cf14807ff3

View File

@ -722,10 +722,10 @@ that is a sibling of the fold the point is currently in."
(interactive (list (current-buffer) (point))) (interactive (list (current-buffer) (point)))
(-when-let (tree (origami-get-fold-tree buffer)) (-when-let (tree (origami-get-fold-tree buffer))
(-when-let (path (origami-fold-find-path-containing tree point)) (-when-let (path (origami-fold-find-path-containing tree point))
(when-let (c (-> (origami-fold-next-sibling (origami-fold-children (-when-let (c (-> (origami-fold-next-sibling (origami-fold-children
(origami-fold-parent path)) (origami-fold-parent path))
(-last-item path)) (-last-item path))
origami-fold-beg)) origami-fold-beg))
(goto-char c))))) (goto-char c)))))
(defun origami-backward-fold-same-level (buffer point) (defun origami-backward-fold-same-level (buffer point)