Revision 252

Date:
2009/11/27 13:48:38
Author:
dpavlin
Revision Log:
relaxed filter to full key name
Files:

Legend:

 
Added
 
Removed
 
Modified

  • trunk/lib/Sack/Server/Gnuplot.pm

     
    21 21
    22 22 if ( my $filter = $param->{filter} ) {
    23 23 $filter = '(' . join('|', @$filter) . ')' if ref $filter eq 'ARRAY';
    24 next unless $title =~ m{$filter};
    24 next unless $key =~ m{$filter};
    25 25 }
    26 26
    27 27 my $path = "/tmp/sack.gnuplot.$key.txt";