don't redirect to index if we didn't change current dataset
authorDobrica Pavlinusic <dpavlin@rot13.org>
Sun, 12 Aug 2012 13:58:13 +0000 (15:58 +0200)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Sun, 12 Aug 2012 13:58:13 +0000 (15:58 +0200)
lib/MojoFacets/Data.pm

index 57c3a60..d5a7284 100644 (file)
@@ -267,8 +267,6 @@ sub _load_path {
 sub load {
        my $self = shift;
 
-       my $path = $self->param('path') || return $self->redirect_to( '/data/index' );
-
        my @paths = $self->param('paths');
        warn "# paths ", dump @paths;
 
@@ -280,6 +278,8 @@ sub load {
 
        $self->_load_path( $_ ) foreach @paths;
 
+       my $path = $self->param('path') || $self->session('path') || @paths[0] || $self->redirect_to('/data/index');
+
        warn "# path $path\n";
        $self->_load_path( $path );