From f6ac178cf3c53952129ed7bc40c6350cfccaebe6 Mon Sep 17 00:00:00 2001 From: P. J. McDermott Date: Fri, 10 Aug 2012 17:44:50 -0400 Subject: Move sections method into MarkdownBook::Document. --- (limited to 'scripts/MarkdownBook') 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) = @_; -- cgit v0.9.1