Parent Directory | Revision Log | Patch
revision 251 by dpavlin, Thu Nov 26 19:02:01 2009 UTC | revision 252 by dpavlin, Fri Nov 27 13:48:38 2009 UTC | |
---|---|---|
# | Line 21 sub date { | Line 21 sub date { |
21 | ||
22 | if ( my $filter = $param->{filter} ) { | if ( my $filter = $param->{filter} ) { |
23 | $filter = '(' . join('|', @$filter) . ')' if ref $filter eq 'ARRAY'; | $filter = '(' . join('|', @$filter) . ')' if ref $filter eq 'ARRAY'; |
24 | next unless $title =~ m{$filter}; | next unless $key =~ m{$filter}; |
25 | } | } |
26 | ||
27 | my $path = "/tmp/sack.gnuplot.$key.txt"; | my $path = "/tmp/sack.gnuplot.$key.txt"; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |