[Bps-public-commit] r11403 - SVN-PropDB/lib/Prophet

clkao at bestpractical.com clkao at bestpractical.com
Wed Apr 2 20:02:04 EDT 2008


Author: clkao
Date: Wed Apr  2 20:02:03 2008
New Revision: 11403

Modified:
   SVN-PropDB/lib/Prophet/CLI.pm

Log:
cleanup useless prophet_repo_path.

Modified: SVN-PropDB/lib/Prophet/CLI.pm
==============================================================================
--- SVN-PropDB/lib/Prophet/CLI.pm	(original)
+++ SVN-PropDB/lib/Prophet/CLI.pm	Wed Apr  2 20:02:03 2008
@@ -29,8 +29,7 @@
     my $self = shift;
     unless ( $self->_handle ) {
         my $root = $ENV{'PROPHET_REPO'} || dir( $ENV{'HOME'}, '.prophet' );
-        my $path = $ENV{'PROPHET_REPO_PATH'} || '_prophet';
-        $self->_handle( Prophet::Handle->new( repository => $root, db_root => $path ) );
+        $self->_handle( Prophet::Handle->new( repository => $root ) );
     }
     return $self->_handle();
 }
@@ -39,8 +38,7 @@
     my $self = shift;
     unless ( $self->_resdb_handle ) {
         my $root = ( $ENV{'PROPHET_REPO'} || dir( $ENV{'HOME'}, '.prophet' ) ) . "_res";
-        my $path = $ENV{'PROPHET_REPO_PATH'} || '_prophet';
-        $self->_resdb_handle( Prophet::Handle->new( repository => $root, db_root => $path ) );
+        $self->_resdb_handle( Prophet::Handle->new( repository => $root ) );
     }
     return $self->_resdb_handle();
 }



More information about the Bps-public-commit mailing list