Changeset aa72a99aecfa74827a4ed9ede305c63845259076 in xas-model


Ignore:
Timestamp:
11/13/15 11:04:33 (4 years ago)
Author:
Kevin L. Esteb <kevin@…>
Branches:
master
Children:
1e6233ae2a42cb86e488e63a873f802dda006026
Parents:
cb04a61cc350d731618ae9ee2a4c9602d12ca68f
git-author:
Kevin L. Esteb <kevin@…> (11/13/15 11:04:33)
git-committer:
Kevin L. Esteb <kevin@…> (11/13/15 11:04:33)
Message:

fixes for new parameter validation

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/lib/XAS/Model/Database.pm

    r5e360ea56aab6a651e9a9576162a1b754f1c3c3c raa72a99aecfa74827a4ed9ede305c63845259076  
    1313  constants  => 'DELIMITER PKG REFS ARRAY', 
    1414  filesystem => 'File', 
     15  utils      => ':validation', 
    1516  exports => { 
    1617    hooks => { 
     
    6768sub tables { 
    6869    my $self = shift; 
    69     my ($tables, $depth) = $self->validate_params(\@_, [ 
     70    my ($tables, $depth) = validate_params(\@_, [ 
    7071        { type     => SCALAR | ARRAYREF }, 
    7172        { optional => 1, default => 3 }, 
     
    105106sub schemas { 
    106107    my $self = shift; 
    107     my ($schemas) = $self->validate_params(\@_, [ 
     108    my ($schemas) = validate_params(\@_, [ 
    108109        { type => SCALAR | ARRAYREF }, 
    109110    ]); 
Note: See TracChangeset for help on using the changeset viewer.