Changeset 6141 for trunk/util/arb_srclst.pl
- Timestamp:
- 14/08/09 16:29:27 (3 years ago)
- Files:
-
- 1 modified
-
trunk/util/arb_srclst.pl (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/util/arb_srclst.pl
r6116 r6141 237 237 my $matches = matchingExpr($str,@$regexp_arr_r); 238 238 if ($matches>0) { 239 if ($debug_matching!=0) { print "'$str' matches '".$$regexp_arr_r[$matches-1]."' => don t use!\n"; }239 if ($debug_matching!=0) { print "'$str' matches '".$$regexp_arr_r[$matches-1]."' => don't use!\n"; } 240 240 $$use_r = 0; 241 241 }
