Trick to fool case-blind filesystems.
authorJarkko Hietaniemi <jhi@iki.fi>
Wed, 26 Sep 2001 11:26:26 +0000 (11:26 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Wed, 26 Sep 2001 11:26:26 +0000 (11:26 +0000)
p4raw-id: //depot/perl@12228

ext/Encode/Makefile.PL

index 30d9ffc..110da40 100644 (file)
@@ -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;