diff options
-rw-r--r-- | scripts/MarkdownBook/Book.pm | 3 | ||||
-rw-r--r-- | scripts/MarkdownBook/Book/HTML.pm | 2 | ||||
-rw-r--r-- | scripts/MarkdownBook/Document.pm | 3 | ||||
-rw-r--r-- | scripts/MarkdownBook/Document/Index.pm | 3 |
4 files changed, 7 insertions, 4 deletions
diff --git a/scripts/MarkdownBook/Book.pm b/scripts/MarkdownBook/Book.pm index 547a4f0..a0cb49e 100644 --- a/scripts/MarkdownBook/Book.pm +++ b/scripts/MarkdownBook/Book.pm @@ -26,7 +26,8 @@ sub new $class = ref($class) || $class; $self = {}; - bless($self,$class); + bless($self, $class); + $self->{'format'} = $format; $self->{'dir'} = $dir; $self->{'docs'} = []; diff --git a/scripts/MarkdownBook/Book/HTML.pm b/scripts/MarkdownBook/Book/HTML.pm index 67acc34..8577170 100644 --- a/scripts/MarkdownBook/Book/HTML.pm +++ b/scripts/MarkdownBook/Book/HTML.pm @@ -32,7 +32,7 @@ sub new $class = ref($class) || $class; $self = {}; - bless($self,$class); + bless($self, $class); $self = $self->SUPER::new('HTML', @args); diff --git a/scripts/MarkdownBook/Document.pm b/scripts/MarkdownBook/Document.pm index 249cdf6..ad6fc0e 100644 --- a/scripts/MarkdownBook/Document.pm +++ b/scripts/MarkdownBook/Document.pm @@ -28,7 +28,8 @@ sub new $class = ref($class) || $class; $self = {}; - bless($self,$class); + bless($self, $class); + $self->{'book'} = $book; $self->{'file'} = $file; $self->{'id'} = $id; diff --git a/scripts/MarkdownBook/Document/Index.pm b/scripts/MarkdownBook/Document/Index.pm index e005396..df94305 100644 --- a/scripts/MarkdownBook/Document/Index.pm +++ b/scripts/MarkdownBook/Document/Index.pm @@ -29,7 +29,8 @@ sub new $class = ref($class) || $class; $self = {}; - bless($self,$class); + bless($self, $class); + $self->{'book'} = $book; $self->{'file'} = 'index'; $self->{'title'} = $book->title(); |