diff options
Diffstat (limited to 'Master/tlpkg/tlperl/lib/Pod/Simple/Debug.pm')
| -rw-r--r-- | Master/tlpkg/tlperl/lib/Pod/Simple/Debug.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/Master/tlpkg/tlperl/lib/Pod/Simple/Debug.pm b/Master/tlpkg/tlperl/lib/Pod/Simple/Debug.pm index 2bbd50a6643..603d4a5b2d0 100644 --- a/Master/tlpkg/tlperl/lib/Pod/Simple/Debug.pm +++ b/Master/tlpkg/tlperl/lib/Pod/Simple/Debug.pm @@ -2,7 +2,7 @@ require 5; package Pod::Simple::Debug; use strict; use vars qw($VERSION ); -$VERSION = '3.29'; +$VERSION = '3.32'; sub import { my($value,$variable); @@ -47,10 +47,10 @@ sub import { # make a not-really-constant *Pod::Simple::DEBUG = sub () { $$variable } ; $$variable = $value; - print "# Starting Pod::Simple::DEBUG = non-constant $variable with val $value\n"; + print STDERR "# Starting Pod::Simple::DEBUG = non-constant $variable with val $value\n"; } else { *Pod::Simple::DEBUG = eval " sub () { $value } "; - print "# Starting Pod::Simple::DEBUG = $value\n"; + print STDERR "# Starting Pod::Simple::DEBUG = $value\n"; } require Pod::Simple; @@ -140,8 +140,8 @@ pod-people@perl.org mail list. Send an empty email to pod-people-subscribe@perl.org to subscribe. This module is managed in an open GitHub repository, -L<https://github.com/theory/pod-simple/>. Feel free to fork and contribute, or -to clone L<git://github.com/theory/pod-simple.git> and send patches! +L<https://github.com/perl-pod/pod-simple/>. Feel free to fork and contribute, or +to clone L<git://github.com/perl-pod/pod-simple.git> and send patches! Patches against Pod::Simple are welcome. Please send bug reports to <bug-pod-simple@rt.cpan.org>. |