diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2023-06-12 15:42:18 +0100 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2023-06-13 13:54:14 +0100 |
| commit | da524d1a1b6f0a0f522275834e2c67d2a9f46ca2 (patch) | |
| tree | 9eae26162428a6190fccab2db657945849cf0f06 | |
| parent | 0839334b67258cc514440fd7f0bd02bb24247157 (diff) | |
| download | dotfiles-da524d1a1b6f0a0f522275834e2c67d2a9f46ca2.tar.gz | |
spw/cperl-shebang: fix shebang, add comments
| -rw-r--r-- | .emacs.d/init.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/.emacs.d/init.el b/.emacs.d/init.el index 1d034671..75653ca7 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -5647,9 +5647,10 @@ We don't use the FILES parameter in the entry for \"d\" in "} catch {" '(cperl-indent-line) \n _ \n "};" '(cperl-indent-line) \n "#>>>") +;; This is for turning one-liners into small scripts. (spw/define-skeleton spw/cperl-shebang (cperl-mode :abbrev "shebang") - "" (read-string "Command line options: " "-w") - "#!/usr/bin/env perl " str "\n\n") + "" (read-string "Command line options: " "-w") ; e.g. -wln + "#!/usr/bin/perl " str "\n\n") (spw/define-skeleton spw/cperl-program (cperl-mode :abbrev "use5") "" nil (and (buffer-file-name) |