use Getopt::Long;
use List::MoreUtils qw(none);
use Pod::Usage;
+use Rose::DB::Object 0.809;
use Term::ANSIColor;
use SL::Auth;
my $old_md5 = md5_hex($orig_file);
my $new_size = length $full_definition;
my $new_md5 = md5_hex($full_definition);
- if ($old_size == $new_size && $old_md5 == $new_md5) {
+ if ($old_size == $new_size && $old_md5 eq $new_md5) {
notice("No changes in $meta_file, skipping.") unless $config{quiet};
return;
}
=head1 SYNOPSIS
- scripts/rose_create_model.pl --client name-or-id table1 [table2 ...]
- scripts/rose_create_model.pl --client name-or-id [--all|-a]
+ scripts/rose_auto_create_model.pl --client name-or-id table1 [table2 ...]
+ scripts/rose_auto_create_model.pl --client name-or-id [--all|-a]
# updates all models
- scripts/rose_create_model.pl --client name-or-id --all
+ scripts/rose_auto_create_model.pl --client name-or-id --all
# updates only customer table, login taken from config
- scripts/rose_create_model.pl customer
+ scripts/rose_auto_create_model.pl customer
# updates only parts table, package will be Part
- scripts/rose_create_model.pl parts=Part
+ scripts/rose_auto_create_model.pl parts=Part
# try to update parts, but don't do it. tell what would happen in detail
- scripts/rose_create_model.pl --no-commit parts
+ scripts/rose_auto_create_model.pl --no-commit parts
=head1 DESCRIPTION