view release on metacpan or  search on metacpan

MANIFEST  view on Meta::CPAN

share/skills/dbio-mysql/SKILL.md
t/00-load.t
t/05-use-dbio-schema.t
t/08-shortcut.t
t/10-mysql.t
t/20-sqlmaker-mysql.t
t/21-datetime-mysql.t
t/22-replicated.t
t/40-diff.t
t/41-introspect-load.t
t/42-diff-drop-table-index-cascade.t
t/50-introspect-contract.t
t/52-adapter.t
t/53-roundtrip-base-types.t
t/54-future-io-async.t
t/55-future-io-live.t
t/56-storage-layer-composition.t
t/57-storage-layer-composition-live.t
t/registry-async-mode.t
t/release-coverage.t
xbin/dbio-mysql-k8s

t/40-diff.t  view on Meta::CPAN

      to_table     => 'other',
      to_columns   => ['id'],
      on_update    => 'NO ACTION',
      on_delete    => 'CASCADE',
    }]},
    { t => {} }, { t => {} },
  );
  is(scalar @ops, 1, 'one fk add');
  my $sql = $ops[0]->as_sql;
  like($sql, qr/ADD CONSTRAINT `fk_t_other` FOREIGN KEY \(`other_id`\) REFERENCES `other`\(`id`\)/, 'add fk');
  like($sql, qr/ON DELETE CASCADE/, 'on delete cascade');
  unlike($sql, qr/ON UPDATE/, 'on update NO ACTION omitted');
}

# --- Diff::ForeignKey drop ---
{
  my @ops = DBIO::MySQL::Diff::ForeignKey->diff(
    { t => [{
      constraint_name => 'fk_old', from_columns => ['x'],
      to_table => 'other', to_columns => ['id'],
    }]},