diff options
Diffstat (limited to 'lib/Kratos/DFADriver/DFA.pm')
| -rw-r--r-- | lib/Kratos/DFADriver/DFA.pm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/Kratos/DFADriver/DFA.pm b/lib/Kratos/DFADriver/DFA.pm index ef834e0..ec52c4d 100644 --- a/lib/Kratos/DFADriver/DFA.pm +++ b/lib/Kratos/DFADriver/DFA.pm @@ -124,6 +124,10 @@ sub traces { $re =~ s{,}{![^:]*:}g; $re =~ s{$}{![^:]*)}; $re =~ s{^}{(^}; + if ($re =~ m{ \$ }x) { + $re =~ s{\$}{}; + $re =~ s{\)$}{\$)}; + } push( @res, $re ); } $filter_re = join( q{|}, @res ); |