Fixed fragment deletion

max197616 · Aug 8, 2019 · 46565ec · 46565ec
1 parent 1c39564
commit 46565ec
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/scripts/extfilter-maker/extfilter_maker.pl b/scripts/extfilter-maker/extfilter_maker.pl
@@ -148,7 +148,10 @@
 		$url2 = substr($url2, 0, $idx);
 	}
 	# delete fragment
-	$url2 =~ s/^(.*)\#(.*)$/$1/;
+	if((my $idx = index($url2, "#")) != -1)
+	{
+		$url2 = substr($url2, 0, $idx);
+	}
 
 	my $url1=new URI($url2);
 	my $scheme=$url1->scheme();