repo.or.cz
/
sgn.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
Merge pull request #5230 from solgenomics/topic/open_pollinated
[sgn.git]
/
lib
/
CXGN
/
List
/
Validate.pm
blob
a4c3dc68b0d3f7b41dd500d06554891d67fa8705
1
2
package
CXGN
::
List
::
Validate
;
3
4
use
Moose
;
5
6
use
Module
::
Pluggable
require
=>
1
;
7
8
has
'composable_validation_check_name'
=> (
9
isa
=>
"Bool"
,
10
is
=>
'rw'
,
11
default
=>
0
12
);
13
14
sub
validate
{
15
my
$self
=
shift
;
16
my
$schema
=
shift
;
17
my
$type
=
shift
;
18
my
$list
=
shift
;
19
20
my
$data
;
21
22
23
24
foreach
my
$p
(
$self
->
plugins
()) {
25
if
(
$type
eq
$p
->
name
()) {
26
$data
=
$p
->
validate
(
$schema
,
$list
,
$self
);
27
}
28
}
29
return
$data
;
30
}
31
32
1
;