From e1293ee10f1d9a845a23bbe127a130c9d1eda3b7 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?John=20Ankarstr=C3=B6m?= Date: Sat, 19 Jun 2021 11:48:26 +0200 Subject: Fix use subs declaration --- dwim | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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 = @_; -- cgit v1.2.3