Lines 946-951
sub _clean_search_term {
Link Here
|
946 |
$term =~ s/(:+)(\s+)$lookahead/$2/g; |
946 |
$term =~ s/(:+)(\s+)$lookahead/$2/g; |
947 |
$term =~ s/(\s+)(:+)$lookahead/$1/g; |
947 |
$term =~ s/(\s+)(:+)$lookahead/$1/g; |
948 |
|
948 |
|
|
|
949 |
# screen all exclamation signs that either are the last symbol or have white space after them |
950 |
$term =~ s/((?<!\\)(?:[\\]{2})*(!(\s|$)))/\\$1/g; |
951 |
|
949 |
# screen all followups for colons after first colon, |
952 |
# screen all followups for colons after first colon, |
950 |
# and correctly ignore unevenly backslashed: |
953 |
# and correctly ignore unevenly backslashed: |
951 |
$term =~ s/((?<!\\)(?:[\\]{2})*:[^:\s]+(?<!\\)(?:[\\]{2})*)(?=:)/$1\\/g; |
954 |
$term =~ s/((?<!\\)(?:[\\]{2})*:[^:\s]+(?<!\\)(?:[\\]{2})*)(?=:)/$1\\/g; |
952 |
- |
|
|