increment $VERSION after 0.20 release
[p5sagit/Sub-Name.git] / lib / Sub / Name.pm
index 527e6e7..844357d 100644 (file)
@@ -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,6 +54,8 @@ use 5.006;
 use strict;
 use warnings;
 
+our $VERSION = '0.21';
+
 use Exporter 5.57 'import';
 
 our @EXPORT = qw(subname);
@@ -60,9 +64,7 @@ our @EXPORT_OK = @EXPORT;
 use XSLoader;
 XSLoader::load(
     __PACKAGE__,
-    exists $Sub::Name::{VERSION}
-        ? ${ $Sub::Name::{VERSION} }
-        : (),
+    $VERSION,
 );
 
 1;