Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Open sidebar
ensembl-gh-mirror
ensembl-hive
Commits
2416bd72
Commit
2416bd72
authored
May 02, 2012
by
Leo Gordon
Browse files
move input_id_template stringification into DFR class
parent
0cbb4afd
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
9 additions
and
7 deletions
+9
-7
modules/Bio/EnsEMBL/Hive/DBSQL/DataflowRuleAdaptor.pm
modules/Bio/EnsEMBL/Hive/DBSQL/DataflowRuleAdaptor.pm
+6
-6
modules/Bio/EnsEMBL/Hive/DataflowRule.pm
modules/Bio/EnsEMBL/Hive/DataflowRule.pm
+3
-1
No files found.
modules/Bio/EnsEMBL/Hive/DBSQL/DataflowRuleAdaptor.pm
View file @
2416bd72
...
...
@@ -117,15 +117,15 @@ sub create_rule {
return
unless
(
$from_analysis
and
$to_analysis_or_url
);
my
$rule
=
Bio::EnsEMBL::Hive::
DataflowRule
->
new
(
-
from_analysis
=>
$from_analysis
,
-
from_analysis
=>
$from_analysis
,
ref
(
$to_analysis_or_url
)
?
(
-
to_analysis
=>
$to_analysis_or_url
)
:
(
-
to_analysis_url
=>
$to_analysis_or_url
),
?
(
-
to_analysis
=>
$to_analysis_or_url
)
:
(
-
to_analysis_url
=>
$to_analysis_or_url
),
-
branch_code
=>
$self
->
branch_name_2_code
(
$branch_name_or_code
),
-
input_id_template
=>
(
ref
(
$input_id_template
)
?
stringify
(
$input_id_template
)
:
$input_id_template
)
,
-
funnel_dataflow_rule_id
=>
$funnel_dataflow_rule_id
,
-
branch_code
=>
$self
->
branch_name_2_code
(
$branch_name_or_code
),
-
input_id_template
=>
$input_id_template
,
-
funnel_dataflow_rule_id
=>
$funnel_dataflow_rule_id
,
);
return
$self
->
store
(
$rule
,
1
);
# avoid redundancy
...
...
modules/Bio/EnsEMBL/Hive/DataflowRule.pm
View file @
2416bd72
...
...
@@ -54,6 +54,7 @@ use Scalar::Util ('weaken');
use
Bio::EnsEMBL::Utils::
Argument
;
# import 'rearrange()'
use
Bio::EnsEMBL::Utils::
Exception
;
use
Bio::EnsEMBL::Hive::
Utils
('
stringify
');
# import 'stringify()'
use
Bio::EnsEMBL::Hive::DBSQL::
AnalysisAdaptor
;
=head2 new
...
...
@@ -163,7 +164,8 @@ sub input_id_template {
my
$self
=
shift
@_
;
if
(
@
_
)
{
# setter mode
$self
->
{'
_input_id_template
'}
=
shift
@_
;
my
$input_id_template
=
shift
@_
;
$self
->
{'
_input_id_template
'}
=
(
ref
(
$input_id_template
)
?
stringify
(
$input_id_template
)
:
$input_id_template
),
}
return
$self
->
{'
_input_id_template
'};
}
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment