more upgrade progress

This commit is contained in:
Graham Knop 2010-05-11 20:03:01 -05:00
parent adf3dbbe04
commit cf92cb5a4f
3 changed files with 31 additions and 24 deletions

View file

@ -23,7 +23,7 @@ sub import {
$extra->{into_level}++;
}
$caller_upgrade_file = (caller 0)[1];
$caller_upgrade_file = File::Spec->rel2abs( (caller 0)[1] );
feature->import(':5.10');
strict->import;
@ -44,7 +44,7 @@ sub _build_exports {
my $dbh;
my $collateral;
my $versionTag;
my $upgrade_file = File::Spec->rel2abs( $caller_upgrade_file );
my $upgrade_file = $caller_upgrade_file;
my $subs;