--- gpt/packaging_tools/perl/GPT/FilelistFunctions.pm	Thu Jun 14 13:04:27 2007
+++ gpt/packaging_tools/perl/GPT/FilelistFunctions.pm	Fri Jun 29 01:47:37 2007
@@ -318,7 +318,7 @@
     # Append the flavor to each library file.
     if ($f =~ m!lib/!)
       {
-        $name =~ s!(lib[^.]+)\.!$ {1}_$flavor.!;
+        $name =~ s!(lib[^.-]+)!$ {1}_$flavor!;
         
         if ($name =~ m!\.(?:s[ol]|dylib)\.?!) {