| Current Path : /proc/thread-self/root/proc/self/root/usr/share/doc/perl-Text-Autoformat/ |
| Current File : //proc/thread-self/root/proc/self/root/usr/share/doc/perl-Text-Autoformat/config.emacs |
;; Add these lines to your .emacs and you will be happy with
;; p5-Text-Autoformat.
;; Use ctrl-c k to reformat a region.
;; Set a global key for autoformat region
(global-set-key (kbd "C-c k") (lambda () (interactive)
(shell-command-on-region (region-beginning) (region-end)
"perl -MText::Autoformat -e \"{autoformat{all=>1};}\""
(current-buffer) t)))