From c5239d61bf425157d3cc1a3b13ac5110c6a884c8 Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Wed, 19 Nov 2014 00:35:20 -0500 Subject: Add command snakemake-compile-project-rule --- lisp/init-snakemake.el | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) (limited to 'lisp/init-snakemake.el') diff --git a/lisp/init-snakemake.el b/lisp/init-snakemake.el index 553cde3..369167a 100644 --- a/lisp/init-snakemake.el +++ b/lisp/init-snakemake.el @@ -26,10 +26,18 @@ run." (default-directory (projectile-project-root))) (call-interactively 'compile))) +(defun km/snakemake-compile-project-rule () + "Run `snakemake-compile-rule' from project root." + (interactive) + (let ((default-directory (projectile-project-root))) + (call-interactively #'snakemake-compile-rule))) + (autoload 'snakemake-compile-command "snakemake-mode") (after 'init-external (define-key km/compile-map "p" - 'km/snakemake-compile-project-file-at-point)) + 'km/snakemake-compile-project-file-at-point) + (define-key km/compile-map "b" + 'km/snakemake-compile-project-rule)) (provide 'init-snakemake) -- cgit v1.2.3