File Coverage

blib/lib/Anego/CLI/Diff.pm

Criterion	Covered	Total	%
statement	24	33	72.7
branch	0	2	0.0
condition			n/a
subroutine	8	9	88.8
pod	0	1	0.0
total	32	45	71.1

package Anego::CLI::Diff;
use strict;
use warnings;
use utf8;

use Anego::Config;
use Anego::Logger;
use Anego::Task::Diff;
use Anego::Task::SchemaLoader;
use Anego::Util;

sub run {
    my ($class, @args) = @_;
    my $config = Anego::Config->load;

    my $source_schema = Anego::Task::SchemaLoader->database;
    my $target_schema = Anego::Task::SchemaLoader->from(@args);

    my $diff = Anego::Task::Diff->diff($source_schema, $target_schema);
    unless ($diff) {
        warnf("target schema == database schema, should no differences\n");
        return;
    }

    print $diff;
}

1;