18 lines
497 B
EmacsLisp
18 lines
497 B
EmacsLisp
;;==============================================================================
|
|
;; Perl
|
|
;;==============================================================================
|
|
|
|
(defun perl-set-interpreter ()
|
|
"Use compile to run perl programs."
|
|
(interactive)
|
|
(set (make-local-variable 'compile-command)
|
|
(concat "perl " buffer-file-name)))
|
|
|
|
(add-hook
|
|
'python-mode-hook
|
|
(lambda ()
|
|
(set (make-local-variable 'compilation-scroll-output) t)
|
|
(perl-set-interpreter)))
|
|
|
|
(provide 'mode-perl)
|