increment $VERSION after 0.22 release

[p5sagit/Sub-Name.git] / lib / Sub / Name.pm

diff --git a/lib/Sub/Name.pm b/lib/Sub/Name.pm
index 527e6e7..d1afeb3 100644 (file)
--- a/lib/Sub/Name.pm
+++ b/lib/Sub/Name.pm
@@ -1,5 +1,6 @@
 package Sub::Name;
-# ABSTRACT: (re)name a sub
+# ABSTRACT: (Re)name a sub
+# KEYWORDS: subroutine function utility name rename symbol
 
 =pod
 
@@ -34,6 +35,7 @@ can be very useful for debugging.
 
 =for :list
 * L<Sub::Identify> - for getting information about subs
+* L<Sub::Util> - set_subname is another implementation of C<subname>
 
 =for stopwords cPanel
 
@@ -52,7 +54,10 @@ use 5.006;
 use strict;
 use warnings;
 
-use Exporter 5.57 'import';
+our $VERSION = '0.23';
+
+use Exporter ();
+*import = \&Exporter::import;
 
 our @EXPORT = qw(subname);
 our @EXPORT_OK = @EXPORT;
@@ -60,9 +65,7 @@ our @EXPORT_OK = @EXPORT;
 use XSLoader;
 XSLoader::load(
     __PACKAGE__,
-    exists $Sub::Name::{VERSION}
-        ? ${ $Sub::Name::{VERSION} }
-        : (),
+    $VERSION,
 );
 
 1;