From a0c6f836d44d9813115f9add97b335e98558dffa Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Sat, 5 Sep 2015 02:53:42 -0400 Subject: bog-{previous,next}-non-heading-citekey: Cosmetics --- bog.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/bog.el b/bog.el index 266eac6..201457a 100644 --- a/bog.el +++ b/bog.el @@ -1189,7 +1189,7 @@ context fails." "Move foward to next non-heading citekey. With argument ARG, do it ARG times." (interactive "p") - (or arg (setq arg 1)) + (setq arg (or arg 1)) (if (< arg 0) (bog-previous-non-heading-citekey (- arg)) (with-syntax-table bog-citekey-syntax-table @@ -1206,7 +1206,7 @@ With argument ARG, do it ARG times." "Move backward to previous non-heading citekey. With argument ARG, do it ARG times." (interactive "p") - (or arg (setq arg 1)) + (setq arg (or arg 1)) (with-syntax-table bog-citekey-syntax-table (let (case-fold-search) (while (and (> arg 0) -- cgit v1.2.3