summaryrefslogtreecommitdiffstats
path: root/scripts
diff options
context:
space:
mode:
authorP. J. McDermott <pjm@nac.net>2012-08-10 17:44:50 (EDT)
committer P. J. McDermott <pjm@nac.net>2012-08-10 17:44:50 (EDT)
commitf6ac178cf3c53952129ed7bc40c6350cfccaebe6 (patch)
treeb058264b4053cd3042cd744fa5f209a71d8b1306 /scripts
parentea75c43dedebe5b6f768841f1a8234d5ef855350 (diff)
Move sections method into MarkdownBook::Document.
Diffstat (limited to 'scripts')
-rw-r--r--scripts/MarkdownBook/Document.pm11
-rw-r--r--scripts/MarkdownBook/Document/HTML.pm11
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) = @_;