Skip to content

GitLab

Commit da0c3228 authored by Eugene Kulesha's avatar Eugene Kulesha
Browse files

allow to pass parameters

parent 4b715c21
Hide whitespace changes
Inline Side-by-side
Showing with 5 additions and 1 deletion
modules/Bio/EnsEMBL/Utils/SeqDumper.pm
View file @ da0c3228
...@@ -97,7 +97,7 @@ my @COMMENTS = ...@@ -97,7 +97,7 @@ my @COMMENTS =
=cut =cut
sub new { sub new {
my ($caller, $slice) = @_; my ($caller, $slice, $params) = @_;
my $class = ref($caller) || $caller; my $class = ref($caller) || $caller;
...@@ -113,6 +113,10 @@ sub new { ...@@ -113,6 +113,10 @@ sub new {
my $self = bless {'feature_types' => $feature_types}, $class; my $self = bless {'feature_types' => $feature_types}, $class;
foreach my $p (sort keys %{$params || {}}) {
$self->{$p} = $params->{$p};
}
return $self; return $self;
} }
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment