diff options
Diffstat (limited to 'examples/clear_text.pl')
| -rw-r--r-- | examples/clear_text.pl | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/examples/clear_text.pl b/examples/clear_text.pl index 07e739f..3a52c7b 100644 --- a/examples/clear_text.pl +++ b/examples/clear_text.pl @@ -29,7 +29,7 @@ join_text($myhtml, $tree, $tree->document->child, $list) if $tree->document->chi print join("\n", @$list); $tree->destroy(); - +$myhtml->destroy(); sub join_text { my ($myhtml, $tree, $node, $res) = @_; @@ -58,7 +58,3 @@ sub join_text { $node = $node->next; } } - - - - |