diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 2000-03-05 17:33:10 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-03-05 17:33:10 +0000 |
| commit | e3e5e1ead913680c13757a1af36ab093b6ff8390 (patch) | |
| tree | b7d2a77508f6842c0b863582d5160835694ac38b /lib/Pod | |
| parent | 7785d218894ec033856d95749a4e3d546eb61f33 (diff) | |
| download | perl-e3e5e1ead913680c13757a1af36ab093b6ff8390.tar.gz | |
add Term::ANSIColor, perldelta notes on Pod::Man, and fix a bug
in Pod::InputObjects (from Russ Allbery)
p4raw-id: //depot/perl@5549
Diffstat (limited to 'lib/Pod')
| -rw-r--r-- | lib/Pod/InputObjects.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Pod/InputObjects.pm b/lib/Pod/InputObjects.pm index 2f89cb91f1..9029f8ccf3 100644 --- a/lib/Pod/InputObjects.pm +++ b/lib/Pod/InputObjects.pm @@ -522,7 +522,7 @@ sub _set_child2parent_links { my ($self, @children) = @_; ## Make sure any sequences know who their parent is for (@children) { - next unless (ref || ref eq 'SCALAR'); + next if (!ref || ref eq 'SCALAR'); if ($_->isa('Pod::InteriorSequence') or $_->can('nested')) { $_->nested($self); } |