branch: externals/dict-tree commit 3969702b6817dfe74eed04eaa7f2492eb1fd2f25 Author: Toby S. Cubitt <toby-predict...@dr-qubit.org> Commit: Toby S. Cubitt <toby-predict...@dr-qubit.org>
Tidy up unnecessary macros by making them into defsubst or defun. --- dict-tree.el | 11 +++++------ 1 file changed, 5 insertions(+), 6 deletions(-) diff --git a/dict-tree.el b/dict-tree.el index b6ea63b..1230627 100644 --- a/dict-tree.el +++ b/dict-tree.el @@ -121,13 +121,12 @@ If START or END is negative, it counts from the end." ;; `goto-line' without messing around with mark and messages -(defmacro dictree--goto-line (line) +(defun dictree--goto-line (line) "Goto line LINE, counting from line 1 at beginning of buffer." - `(progn - (goto-char 1) - (if (eq selective-display t) - (re-search-forward "[\n\C-m]" nil 'no-error (1- ,line)) - (forward-line (1- ,line))))) + (goto-char 1) + (if (eq selective-display t) + (re-search-forward "[\n\C-m]" nil 'no-error (1- line)) + (forward-line (1- line))))