From 1c131dcd79d287911dfa3b7f6fb5fc8e7d0fa4ba Mon Sep 17 00:00:00 2001 From: P. J. McDermott Date: Sat, 11 Aug 2012 17:29:09 -0400 Subject: Remove type-specific document modules. --- (limited to 'scripts/MarkdownBook/Document/Index.pm') diff --git a/scripts/MarkdownBook/Document/Index.pm b/scripts/MarkdownBook/Document/Index.pm deleted file mode 100644 index df94305..0000000 --- a/scripts/MarkdownBook/Document/Index.pm +++ /dev/null @@ -1,48 +0,0 @@ -# Copyright (C) 2012 Patrick "P. J." McDermott -# -# This program is free software: you can redistribute it and/or modify -# it under the terms of the GNU General Public License as published by -# the Free Software Foundation, either version 3 of the License, or -# (at your option) any later version. -# -# This program is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with this program. If not, see . - -use strict; -use warnings; - -use MarkdownBook::Document; - -package MarkdownBook::Document::Index; - -our @ISA = qw(MarkdownBook::Document); - -sub new -{ - my ($class, $book) = @_; - my $self; - - $class = ref($class) || $class; - $self = {}; - bless($self, $class); - - $self->{'book'} = $book; - $self->{'file'} = 'index'; - $self->{'title'} = $book->title(); - - return $self; -} - -sub full_title -{ - my ($self) = @_; - - return undef; -} - -1; -- cgit v0.9.1