diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2020-04-22 13:12:18 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2020-04-22 13:12:18 -0700 |
commit | cb92043b165afb121225802cb997c460ef133861 (patch) | |
tree | 8da909a820255378d4fa3db25f9bdc4c816a718d /perl5 | |
parent | d53056bd328179f57dbddd4e7a34f2ef824c09c2 (diff) | |
download | dotfiles-cb92043b165afb121225802cb997c460ef133861.tar.gz |
switch back Rexfile -> insinuate-dotfiles for the time being
Diffstat (limited to 'perl5')
-rw-r--r-- | perl5/Local/Rex/Util.pm | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/perl5/Local/Rex/Util.pm b/perl5/Local/Rex/Util.pm deleted file mode 100644 index 0aa966f8..00000000 --- a/perl5/Local/Rex/Util.pm +++ /dev/null @@ -1,22 +0,0 @@ -package Local::Rex::Util; - -use 5.028; -use strict; -use warnings; -use parent 'Exporter'; - -use Rex -feature => ['1.4']; - -our @EXPORT = qw( as as_me ); - -sub as ($&) { - can_run "sudo" or die "wanted to execute as $_[0] but no sudo on PATH!"; - sudo { user => $_[0], command => $_[1]}; -} - -sub as_me (&) { - my $me = get("me") || "spwhitton"; - as($me, \&{$_[0]}); -} - -1; |