Commit 3cdb7a0d authored by Andreas Kusalananda Kähäri's avatar Andreas Kusalananda Kähäri
Browse files

Add named argument '-lightweight' to fetch_bins_by_slice().

parent 1b10656c
...@@ -19,11 +19,17 @@ use constant { FEATURE_DBID => 0, ...@@ -19,11 +19,17 @@ use constant { FEATURE_DBID => 0,
sub fetch_bins_by_Slice { sub fetch_bins_by_Slice {
my $this = shift; my $this = shift;
my ( $slice, $method, $nbins, $logic_name ) = my ( $slice, $method, $nbins, $logic_name, $lightweight ) =
rearrange( [ 'SLICE', 'METHOD', 'NBINS', 'LOGIC_NAME' ], @_ ); rearrange( [ 'SLICE', 'METHOD',
'NBINS', 'LOGIC_NAME',
'LIGHTWEIGHT'
],
@_ );
# Temporarily set the colleciton to be lightweight.
my $old_value = $this->_lightweight(); my $old_value = $this->_lightweight();
$this->_lightweight(1); if ( defined($lightweight) ) { $this->_lightweight($lightweight) }
else { $this->_lightweight(1) }
my $bins = my $bins =
$this->_bin_features( -slice => $slice, $this->_bin_features( -slice => $slice,
...@@ -34,6 +40,7 @@ sub fetch_bins_by_Slice { ...@@ -34,6 +40,7 @@ sub fetch_bins_by_Slice {
$slice, undef, $logic_name $slice, undef, $logic_name
) ); ) );
# Reset the lightweightness to whatever it was before.
$this->_lightweight($old_value); $this->_lightweight($old_value);
return $bins; return $bins;
......
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