summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorP. J. McDermott <pjm@nac.net>2012-08-12 08:01:37 (EDT)
committer P. J. McDermott <pjm@nac.net>2012-08-12 08:01:37 (EDT)
commit4f8f763f09a46b3e5a1d601951d90025528f8fda (patch)
tree54a46ad4109ce3829e138514f26b5c9b8c74d3c4
parentb8ea4e24bf2c177f7c51861d1a33166f912082c5 (diff)
Add method to get document ID.
-rw-r--r--scripts/MarkdownBook/Document.pm7
1 files changed, 7 insertions, 0 deletions
diff --git a/scripts/MarkdownBook/Document.pm b/scripts/MarkdownBook/Document.pm
index 9bb98c5..575ce16 100644
--- a/scripts/MarkdownBook/Document.pm
+++ b/scripts/MarkdownBook/Document.pm
@@ -77,6 +77,13 @@ sub file_path
return $self->{'book'}->dir() . '/' . $self->{'file'};
}
+sub id
+{
+ my ($self) = @_;
+
+ return $self->{'id'};
+}
+
sub title
{
my ($self, $title) = @_;