diff options
author | P. J. McDermott <pjm@nac.net> | 2012-08-10 12:34:47 (EDT) |
---|---|---|
committer | P. J. McDermott <pjm@nac.net> | 2012-08-10 12:34:47 (EDT) |
commit | 9a90b5ef3d8f9572838700fa27ec568d29f76d64 (patch) | |
tree | 00de5c0b5541bbf6f9a83ed2e8791a4741ded1cc /scripts/MarkdownBook | |
parent | 5f516d09b5f33284c65b75b5c03d5144ed7c6418 (diff) |
Standardize constructor code style.
Diffstat (limited to 'scripts/MarkdownBook')
-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(); |