aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--snakemake.el10
1 files changed, 9 insertions, 1 deletions
diff --git a/snakemake.el b/snakemake.el
index 396290a..9d840c2 100644
--- a/snakemake.el
+++ b/snakemake.el
@@ -319,6 +319,13 @@ targets."
nil nil nil nil
default)))
+(defun snakemake-read-rules (&rest _)
+ "Read multiple rules for the current Snakefile."
+ (mapconcat #'identity
+ (completing-read-multiple "Rules (comma-separated): "
+ (snakemake-all-rules))
+ " "))
+
;;; Compilation commands
@@ -396,7 +403,8 @@ $ snakemake [ARGS] -- <targets>"
(?r "Print reason" "--reason")
(?t "Touch files" "--touch"))
:options
- '((?j "Number of jobs" "-j"))
+ '((?a "Allowed rules" "--allowed-rules " snakemake-read-rules)
+ (?j "Number of jobs" "-j"))
:actions
'((?c "Compile" snakemake-compile) nil nil
(?p "Build target at point" snakemake-build-targets-at-point)