From 63bde5ed5c71a3972f633dd343dc5a8dfc874a7f Mon Sep 17 00:00:00 2001
From: Sean Whitton <spwhitton@spwhitton.name>
Date: Mon, 27 Jan 2020 16:38:14 -0700
Subject: eliminate a predeclaration

---
 perl5/Local/Rex/Util.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'perl5')

diff --git a/perl5/Local/Rex/Util.pm b/perl5/Local/Rex/Util.pm
index db81c8d8..0aa966f8 100644
--- a/perl5/Local/Rex/Util.pm
+++ b/perl5/Local/Rex/Util.pm
@@ -15,9 +15,8 @@ sub as ($&) {
 }
 
 sub as_me (&) {
-    sub as ($&);
     my $me = get("me") || "spwhitton";
-    as $me, \&{$_[0]};
+    as($me, \&{$_[0]});
 }
 
 1;
-- 
cgit v1.2.3