diff options
| author | Kyle Meyer <kyle@kyleam.com> | 2014-08-24 00:19:18 -0400 |
|---|---|---|
| committer | Kyle Meyer <kyle@kyleam.com> | 2014-08-24 00:19:18 -0400 |
| commit | 0c44981cdde622579d09e5be2c0eea44a7f87ce9 (patch) | |
| tree | d5be52d6d2552a4a95ab70aaf674e26b99c9bf27 /lisp | |
| parent | d95bb21e64d2c00498073051847964161fc9fa23 (diff) | |
| download | emacs.d-0c44981cdde622579d09e5be2c0eea44a7f87ce9.tar.gz | |
Add snakemake-compile-project-file-at-point
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/init-snakemake.el | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/lisp/init-snakemake.el b/lisp/init-snakemake.el index 5198667..64d235c 100644 --- a/lisp/init-snakemake.el +++ b/lisp/init-snakemake.el @@ -11,4 +11,12 @@ (set (make-local-variable 'compile-command) (snakemake-compile-command)))) +(defun km/snakemake-compile-project-file-at-point () + "Run Snakemake to produce project file at point." + (interactive) + (let ((compile-command (concat (snakemake-compile-command) " " + (km/project-filename-at-point))) + (default-directory (projectile-project-root))) + (call-interactively 'compile))) + (provide 'init-snakemake) |