X-Git-Url: http://ftp.safe.ca/?a=blobdiff_plain;f=scripts%2Fbootgraph.pl;h=12caa822a232eeddc0fc97606fc5002a86a4daf7;hb=95e74e62c1540b1115fe8cec5b592f22960f2bb2;hp=b0246307aac497ae36b8266180b48a244c9c374d;hpb=d3f8ddea444b3b5324d74144177a50557cd1f137;p=safe%2Fjmp%2Flinux-2.6

diff --git a/scripts/bootgraph.pl b/scripts/bootgraph.pl
index b024630..12caa82 100644
--- a/scripts/bootgraph.pl
+++ b/scripts/bootgraph.pl
@@ -51,7 +51,7 @@ my %pidctr;
 
 while (<>) {
 	my $line = $_;
-	if ($line =~ /([0-9\.]+)\] calling  ([a-zA-Z0-9\_]+)\+/) {
+	if ($line =~ /([0-9\.]+)\] calling  ([a-zA-Z0-9\_\.]+)\+/) {
 		my $func = $2;
 		if ($done == 0) {
 			$start{$func} = $1;
@@ -87,7 +87,7 @@ while (<>) {
 		$count = $count + 1;
 	}
 
-	if ($line =~ /([0-9\.]+)\] initcall ([a-zA-Z0-9\_]+)\+.*returned/) {
+	if ($line =~ /([0-9\.]+)\] initcall ([a-zA-Z0-9\_\.]+)\+.*returned/) {
 		if ($done == 0) {
 			$end{$2} = $1;
 			$maxtime = $1;