X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FSub%2FName.pm;h=c59e9244b7a29a4fa6fc266a2a87763745f69422;hb=e7a62a4071b77329ff736a31a956c77e9b664299;hp=bfe309359bbc48d258dd86a4b42e23e95276523a;hpb=54595ea863696d904b22754dc8902e52aa0fcdfa;p=p5sagit%2FSub-Name.git

diff --git a/lib/Sub/Name.pm b/lib/Sub/Name.pm
index bfe3093..c59e924 100644
--- 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
 
@@ -15,6 +16,8 @@ package Sub::Name;
 
 This module has only one function, which is also exported by default:
 
+=for stopwords subname
+
 =head2 subname NAME, CODEREF
 
 Assigns a new name to referenced sub.  If package specification is omitted in
@@ -30,12 +33,11 @@ can be very useful for debugging.
 
 =head1 SEE ALSO
 
-=over 4
-
-=item *
-L<Sub::Identify> - for getting information about subs
+=for :list
+* L<Sub::Identify> - for getting information about subs
+* L<Sub::Util> - set_subname is another implementation of C<subname>
 
-=back
+=for stopwords cPanel
 
 =head1 COPYRIGHT AND LICENSE
 
@@ -52,7 +54,10 @@ use 5.006;
 use strict;
 use warnings;
 
-use base 'Exporter';
+our $VERSION = '0.25';
+
+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;