summaryrefslogtreecommitdiff
path: root/snakemake-mode.el
diff options
context:
space:
mode:
authorKyle Meyer <kyle@kyleam.com>2016-10-26 21:57:16 -0400
committerKyle Meyer <kyle@kyleam.com>2016-10-26 21:57:16 -0400
commitd8012ab4661630283c4ac6521a094cbe09ea4707 (patch)
treea031a365b01a307b7e2cbc252be7f008442b3edf /snakemake-mode.el
parent2bceb7f266f71cd85f9b328de02797eb457da17c (diff)
downloadsnakemake-mode-d8012ab4661630283c4ac6521a094cbe09ea4707.tar.gz
cosmetics: Use zerop instead of (= 0 ...)
Diffstat (limited to 'snakemake-mode.el')
-rw-r--r--snakemake-mode.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/snakemake-mode.el b/snakemake-mode.el
index b397e2d..05a76f0 100644
--- a/snakemake-mode.el
+++ b/snakemake-mode.el
@@ -171,7 +171,7 @@
"Move to beginning of rule block.
With ARG, do it that many times. Negative ARG signals to move
forward rather than backward."
- (when (or (null arg) (= arg 0))
+ (when (or (null arg) (zerop arg))
(setq arg 1))
(funcall (if (> arg 0)
#'re-search-backward
@@ -192,7 +192,7 @@ forward rather than backward."
"Move to beginning of current rule block or function.
With ARG, do it that many times. Negative ARG signals to move
forward rather than backward."
- (when (or (null arg) (= arg 0))
+ (when (or (null arg) (zerop arg))
(setq arg 1))
(let ((choose-fn (if (> arg 0) #'max #'min))
(cands (delq nil
@@ -240,7 +240,7 @@ returned."
;; :after-block-start.
:after-block-start))
(let* ((initial-indent (current-indentation))
- (goto-first-p (or (not previous) (= initial-indent 0))))
+ (goto-first-p (or (not previous) (zerop initial-indent))))
(save-excursion
(save-restriction
(widen)