diff options
| author | Kyle Meyer <kyle@kyleam.com> | 2016-10-26 21:57:16 -0400 |
|---|---|---|
| committer | Kyle Meyer <kyle@kyleam.com> | 2016-10-26 21:57:16 -0400 |
| commit | d8012ab4661630283c4ac6521a094cbe09ea4707 (patch) | |
| tree | a031a365b01a307b7e2cbc252be7f008442b3edf /snakemake-mode.el | |
| parent | 2bceb7f266f71cd85f9b328de02797eb457da17c (diff) | |
| download | snakemake-mode-d8012ab4661630283c4ac6521a094cbe09ea4707.tar.gz | |
cosmetics: Use zerop instead of (= 0 ...)
Diffstat (limited to 'snakemake-mode.el')
| -rw-r--r-- | snakemake-mode.el | 6 |
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) |