From 12b32ad14f91d218198340a30110585b98a0efd5 Mon Sep 17 00:00:00 2001
From: pius <pius@pld-linux.org>
Date: Fri, 22 Oct 1999 22:03:13 +0000
Subject: [PATCH] - small fixes in module name format

Changed files:
    perl-find-provides.patch -> 1.2
---
 perl-find-provides.patch | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/perl-find-provides.patch b/perl-find-provides.patch
index 632373e..529ed4a 100644
--- a/perl-find-provides.patch
+++ b/perl-find-provides.patch
@@ -13,7 +13,7 @@
 +
 --- perl5.005_03/find-perl.prov	Thu Jan  1 01:00:00 1970
 +++ perl5.005_03.new/find-perl.prov	Fri Oct 22 17:44:18 1999
-@@ -0,0 +1,113 @@
+@@ -0,0 +1,112 @@
 +#!FPPATH/perl
 +
 +# a simple script to print the proper name for perl libraries.
@@ -43,11 +43,10 @@
 +
 +
 +foreach $module (sort keys %require) {
-+  ($mod = $module) =~ s/::/-/g;
 +  if (length($require{$module}) == 0) {
-+    print "perl($mod)\n";
++    print "perl($module)\n";
 +  } else {
-+    print "perl($mod) = $require{$module}\n";
++    print "perl($module) = $require{$module}\n";
 +
 +    # we need to print it without the version number until the
 +    # requires syntax accepts version numbers correctly.
-- 
2.44.0