|
From: <sv...@va...> - 2011-05-11 16:46:00
|
Author: weidendo
Date: 2011-05-11 17:45:52 +0100 (Wed, 11 May 2011)
New Revision: 11747
Log:
Fixed bug 272661
Paths should be quoted in regexps (in callgrind_annotate).
Modified:
trunk/callgrind/callgrind_annotate.in
Modified: trunk/callgrind/callgrind_annotate.in
===================================================================
--- trunk/callgrind/callgrind_annotate.in 2011-05-11 16:32:18 UTC (rev 11746)
+++ trunk/callgrind/callgrind_annotate.in 2011-05-11 16:45:52 UTC (rev 11747)
@@ -607,7 +607,7 @@
if (defined $curr_file);
$curr_file = uncompressed_name("fl",$1);
- $curr_file =~ s/^$pwd//;
+ $curr_file =~ s/^\Q$pwd\E//;
$curr_file_ind_CCs = $all_ind_CCs{$curr_file};
$curr_file_ind_CCs = {} unless (defined $curr_file_ind_CCs);
@@ -617,7 +617,7 @@
$all_ind_CCs{$curr_file} = $curr_file_ind_CCs;
$curr_file = uncompressed_name("fl",$2);
- $curr_file =~ s/^$pwd//;
+ $curr_file =~ s/^\Q$pwd\E//;
$curr_name = "$curr_file:$curr_fn";
$curr_file_ind_CCs = $all_ind_CCs{$curr_file};
$curr_file_ind_CCs = {} unless (defined $curr_file_ind_CCs);
|