aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKyle Meyer <kyle@kyleam.com>2015-01-09 23:53:50 -0500
committerKyle Meyer <kyle@kyleam.com>2015-01-09 23:53:50 -0500
commit27f7a0b0a2e5202360a0ff3607e251dc52dbe7a8 (patch)
treeb2c661d3a95e5dc72645127f2dc4e5d558d3bfe5
parent69bc72f551c46feae74a8b59d63096a164eeaa1a (diff)
downloadsnakemake-mode-27f7a0b0a2e5202360a0ff3607e251dc52dbe7a8.tar.gz
Replace looking-at calls with looking-at-p calls
-rw-r--r--snakemake-mode.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/snakemake-mode.el b/snakemake-mode.el
index e8a146a..dc3fb9f 100644
--- a/snakemake-mode.el
+++ b/snakemake-mode.el
@@ -147,9 +147,9 @@ rule blocks (or on a blank line directly below), call
(let ((start-indent (current-indentation)))
(beginning-of-line)
(cond
- ((looking-at (concat "^[ \t]*" snakemake-rule-or-subworkflow-re))
+ ((looking-at-p (concat "^[ \t]*" snakemake-rule-or-subworkflow-re))
(delete-horizontal-space))
- ((looking-at (concat "^[ \t]*" snakemake-field-key-re))
+ ((looking-at-p (concat "^[ \t]*" snakemake-field-key-re))
(delete-horizontal-space)
(indent-to snakemake-indent-field-offset))
((snakemake-run-field-first-line-p)
@@ -174,7 +174,7 @@ rule blocks (or on a blank line directly below), call
"Return t if point is in block or on first blank line following one."
(save-excursion
(beginning-of-line)
- (when (looking-at "^ *$")
+ (when (looking-at-p "^ *$")
(forward-line -1))
(end-of-line)
(let ((start (point)))