index 43775706c3b8ccc6af6929a0d623b7145496f692..4ba9751bd77c4b0eb0ab7f693602187a24afb9c3 100644 (file)
my %p : shared;
- if ($data !~ m/^$pkg/) {
+ if ($data !~ m/^$pkg\:\:/) {
$data = $pkg . "::" . $data;
}