(defslimefn inspector-next []
(with-emacs-package
(let [pos (position #{@*inspectee*} @*inspector-history*)]
(cond
(= (inc pos) (count @*inspector-history*)) nil
:else (inspect-object (get @*inspector-history* (inc pos)))))))
Comments top
No comments for inspector-next. Log in to add a comment.