diff options
Diffstat (limited to 'misc/perl_checker.el')
-rw-r--r-- | misc/perl_checker.el | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/misc/perl_checker.el b/misc/perl_checker.el new file mode 100644 index 0000000..135cb99 --- /dev/null +++ b/misc/perl_checker.el @@ -0,0 +1,10 @@ +(defun run-perl_checker () + (interactive) + (save-some-buffers 1) + (compile (concat "perl_checker --restrict-to-files " (buffer-file-name (current-buffer))))) + +(let ((hook '(lambda () + (local-set-key [(control return)] 'run-perl_checker) + ))) + (add-hook 'perl-mode-hook hook) + (add-hook 'cperl-mode-hook hook)) |