diff options
Diffstat (limited to 'scripts')
-rw-r--r-- | scripts/MarkdownBook/Document.pm | 11 | ||||
-rw-r--r-- | scripts/MarkdownBook/Document/HTML.pm | 11 |
2 files changed, 11 insertions, 11 deletions
diff --git a/scripts/MarkdownBook/Document.pm b/scripts/MarkdownBook/Document.pm index ad6fc0e..fe6634f 100644 --- a/scripts/MarkdownBook/Document.pm +++ b/scripts/MarkdownBook/Document.pm @@ -95,4 +95,15 @@ sub next return $old; } +sub sections +{ + my ($self) = @_; + + # FIXME: Why is this necessary?! + foreach my $sec (@{$self->{'sections'}}) { + } + + return $self->{'sections'}; +} + 1; diff --git a/scripts/MarkdownBook/Document/HTML.pm b/scripts/MarkdownBook/Document/HTML.pm index 5dda99a..3548b65 100644 --- a/scripts/MarkdownBook/Document/HTML.pm +++ b/scripts/MarkdownBook/Document/HTML.pm @@ -62,17 +62,6 @@ sub parse } } -sub sections -{ - my ($self) = @_; - - # FIXME: Why is this necessary?! - foreach my $sec (@{$self->{'sections'}}) { - } - - return $self->{'sections'}; -} - sub output { my ($self) = @_; |