# [PATCH] gitweb: fix error in sanitize when highlight is enabled

1 messages from 2012-12-30 to 2012-12-30. Participants: Orgad Shaneh.
Thread: https://gitlist.dev/t/32478

## Orgad Shaneh, 2012-12-30 11:52

Subject: [PATCH] gitweb: fix error in sanitize when highlight is enabled
Message-ID: <1356868373-12721-1-git-send-email-orgads@gmail.com>
URL: https://gitlist.dev/e/1356868373-12721-1-git-send-email-orgads%40gmail.com

```
$1 becomes undef by internal regex, since it has no capture groups.

Match against accpetable control characters using index() instead of a regex.

Signed-off-by: Orgad Shaneh <orgads@gmail.com>
---
 gitweb/gitweb.perl |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gitweb/gitweb.perl b/gitweb/gitweb.perl
index 0f207f2..6d5aeab 100755
--- a/gitweb/gitweb.perl
+++ b/gitweb/gitweb.perl
@@ -1556,7 +1556,7 @@ sub sanitize {
 	return undef unless defined $str;
 
 	$str = to_utf8($str);
-	$str =~ s|([[:cntrl:]])|($1 =~ /[\t\n\r]/ ? $1 : quot_cec($1))|eg;
+	$str =~ s|([[:cntrl:]])|(index("\t\n\r", $1) != -1 ? $1 : quot_cec($1))|eg;
 	return $str;
 }
 
-- 
1.7.10.4

```