convert Catalyst app to use KiokuDB backend

[scpubgit/stemmatology.git] / TreeOfTexts / lib / TreeOfTexts / Controller / Stemmagraph.pm

diff --git a/TreeOfTexts/lib/TreeOfTexts/Controller/Stemmagraph.pm b/TreeOfTexts/lib/TreeOfTexts/Controller/Stemmagraph.pm
index eb9594f..1d6a8e0 100644 (file)
--- a/TreeOfTexts/lib/TreeOfTexts/Controller/Stemmagraph.pm
+++ b/TreeOfTexts/lib/TreeOfTexts/Controller/Stemmagraph.pm
@@ -15,7 +15,7 @@ __PACKAGE__->config(namespace => '');
 
 =head1 NAME
 
-TreeOfTexts::Controller::Root - Root Controller for TreeOfTexts
+TreeOfTexts::Controller::Stemmagraph - Simple controller for stemma display
 
 =head1 DESCRIPTION
 
@@ -23,17 +23,8 @@ TreeOfTexts::Controller::Root - Root Controller for TreeOfTexts
 
 =head1 METHODS
 
-=head2 index
-
-The root page (/)
-
 =cut
 
-sub index :Path :Args(0) {
-    my ( $self, $c ) = @_;
-    $c->stash->{template} = 'dotinput.tt2';  
-}
-
 sub get_graph :Local {
        my( $self, $c ) = @_;
        # If called interactively, we have params 'display', 'output', 'witnesses'
@@ -41,7 +32,6 @@ sub get_graph :Local {
        # The body is actually a File::Temp object; this is undocumented but 
        # so it seems to be.
        my $dotfile;
-       $DB::single = 1;
        my $must_unlink = 0;
        if( $c->request->params->{'dot'} ) {
            # Make a File::Temp object.
@@ -62,18 +52,6 @@ sub get_graph :Local {
     $c->forward( "View::SVG" );
 }
 
-=head2 default
-
-Standard 404 error page
-
-=cut
-
-sub default :Path {
-    my ( $self, $c ) = @_;
-    $c->response->body( 'Page not found' );
-    $c->response->status(404);
-}
-
 =head2 end
 
 Attempt to render a view, if needed.