From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Wed, 26 Sep 2001 11:26:26 +0000 (+0000)
Subject: Trick to fool case-blind filesystems.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b9a7ec59056200248f9364bad1f7ca7c28aba033;p=p5sagit%2Fp5-mst-13.2.git

Trick to fool case-blind filesystems.

p4raw-id: //depot/perl@12228
---

diff --git a/ext/Encode/Makefile.PL b/ext/Encode/Makefile.PL
index 30d9ffc..110da40 100644
--- a/ext/Encode/Makefile.PL
+++ b/ext/Encode/Makefile.PL
@@ -46,6 +46,9 @@ sub post_initialize
   {
    $o{$e.$x} = 1;
   }
+ # Trick case-blind filesystems.
+ delete $o{'encode'.$x};
+ $o{'Encode'.$x'} = 1;
  # Reset the variable
  $self->{'O_FILES'} = [sort keys %o];
  my @files;