Ignore:
Timestamp:
Aug 30, 2019, 1:31:33 PM (5 years ago)
Author:
g7moreau
Message:
  • Error on version database
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/project-meta/project-meta

    r379 r396  
    88use strict;
    99use warnings;
    10 use version; our $VERSION = version->declare('0.1.1');
     10use version; our $VERSION = version->declare('0.1.2');
    1111
    1212use File::Copy qw(copy);   
     
    117117      my $upgrade = 'upgrade_version_' . ($CFG_VERSION - 1) . '_to_' . $CFG_VERSION;
    118118      &{$upgrade}($meta);
     119      $initial_version = $CFG_VERSION;
    119120      }
    120121   elsif ($initial_version < $CFG_VERSION) {
     
    122123      }
    123124
    124    return wantarray ? ($meta, $version) : $meta;
     125   return wantarray ? ($meta, $initial_version) : $meta;
    125126   }
    126127
Note: See TracChangeset for help on using the changeset viewer.