… | … | ||
---|---|---|---|
1538 | ], | 1538 | ], |
1539 | on_changed => sub { | 1539 | on_changed => sub { |
1540 | my ($self, $pod) = @_; | 1540 | my ($self, $pod) = @_; |
1541 | 1541 | ||
1542 | $viewer->clear; | 1542 | $viewer->clear; |
1543 | $viewer->add_paragraph (@{ CFPlus::Pod::pod_paragraphs $pod }); | 1543 | $viewer->add_paragraph (CFPlus::Pod::section pod => $pod); |
1544 | $viewer->set_offset (0); | 1544 | $viewer->set_offset (0); |
1545 | 1545 | ||
1546 | 0 | 1546 | 0 |
1547 | }, | 1547 | }, |
1548 | on_visibility_change => sub { | 1548 | on_visibility_change => sub { |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |