| conf |
(require 'template)
(template-initialize)
(require 'perlnow)
(global-set-key "\C-c's" 'perlnow-script)
(global-set-key "\C-c'm" 'perlnow-module)
(global-set-key "\C-c'o" 'perlnow-object-module)
(global-set-key "\C-c'h" 'perlnow-h2xs)
(global-set-key "\C-c'c" 'perlnow-run-check)
(global-set-key "\C-c'r" 'perlnow-run)
(global-set-key "\C-c'a" 'perlnow-alt-run)
(global-set-key "\C-c'd" 'perlnow-perldb)
(global-set-key "\C-c'R" 'perlnow-set-run-string)
(global-set-key "\C-c'A" 'perlnow-set-alt-run-string)
(global-set-key "\C-c't" 'perlnow-edit-test-file)
(global-set-key "\C-c'b" 'perlnow-back-to-code)
(global-set-key "\C-c'~" 'perlnow-perlify-this-buffer-simple)
(setq perlnow-script-location
(substitute-in-file-name "$HOME/bin"))
(setq perlnow-pm-location
(substitute-in-file-name "$HOME/lib"))
(setq perlnow-h2xs-location'
(substitute-in-file-name "$HOME/perldev")) |