summaryrefslogtreecommitdiffstats
path: root/misc/perl_checker.el
diff options
context:
space:
mode:
Diffstat (limited to 'misc/perl_checker.el')
-rw-r--r--misc/perl_checker.el10
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))