diff options
| author | Frank Wiegand <frank.wiegand@gmail.com> | 2008-12-20 20:50:26 +0100 |
|---|---|---|
| committer | Steve Peters <steve@fisharerojo.org> | 2008-12-20 23:33:52 -0600 |
| commit | 640238c5b29c59bf811361d5e88cd334fb2e4cb9 (patch) | |
| tree | 843742f6e4c825ffea810e54db61a46c63ecaa61 | |
| parent | f87ebf2c2829dea9288b84872cd584c44e1ce940 (diff) | |
| download | perl-640238c5b29c59bf811361d5e88cd334fb2e4cb9.tar.gz | |
PATCH -- POD error in Symbol.pm
Hi,
two POD errors in Symbol.pm:
- wrong comment,
- missing semicolon.
Patch is attached.
Thanks, Frank
| -rw-r--r-- | lib/Symbol.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/Symbol.pm b/lib/Symbol.pm index 3bb5d9240c..1e408b59f7 100644 --- a/lib/Symbol.pm +++ b/lib/Symbol.pm @@ -18,8 +18,8 @@ Symbol - manipulate Perl symbols and their names # replace *FOO{IO} handle but not $FOO, %FOO, etc. *FOO = geniosym; - print qualify("x"), "\n"; # "Test::x" - print qualify("x", "FOO"), "\n" # "FOO::x" + print qualify("x"), "\n"; # "main::x" + print qualify("x", "FOO"), "\n"; # "FOO::x" print qualify("BAR::x"), "\n"; # "BAR::x" print qualify("BAR::x", "FOO"), "\n"; # "BAR::x" print qualify("STDOUT", "FOO"), "\n"; # "main::STDOUT" (global) @@ -85,7 +85,7 @@ require Exporter; @EXPORT = qw(gensym ungensym qualify qualify_to_ref); @EXPORT_OK = qw(delete_package geniosym); -$VERSION = '1.06'; +$VERSION = '1.07'; my $genpkg = "Symbol::"; my $genseq = 0; |