aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn Ankarström <john@ankarstrom.se>2021-06-19 11:48:26 +0200
committerJohn Ankarström <john@ankarstrom.se>2021-06-19 11:48:26 +0200
commite1293ee10f1d9a845a23bbe127a130c9d1eda3b7 (patch)
tree3d8976081a470f2d7001cb69fc777d9337bcaad8
parent10a3fb33824a239b0390203bea1aa4019525ec0c (diff)
downloaddwim-e1293ee10f1d9a845a23bbe127a130c9d1eda3b7.tar.gz
Fix use subs declaration
-rwxr-xr-xdwim3
1 files changed, 2 insertions, 1 deletions
diff --git a/dwim b/dwim
index 1e736cf..c958585 100755
--- a/dwim
+++ b/dwim
@@ -5,7 +5,7 @@
use v5.24;
use warnings;
use strict;
-use subs qw/arguments dir env fail handle path run/;
+use subs qw/dir dirname env fail handle path run/;
my @OPENER = ('xtopen');
my @EDITOR = (@OPENER, 'vi');
@@ -140,6 +140,7 @@ sub dirname {
$path =~ s,/[^/]+$,,;
return $path;
}
+
# env -- for (K => V), return environment variable K if defined, otherwise V
sub env {
my %h = @_;