Ticket #36: short_path_name_win32.patch

File short_path_name_win32.patch, 0.6 KB (added by chromatic, 5 years ago)

Potential fix for the first error.

  • config/init/hints/mswin32.pm

    === config/init/hints/mswin32.pm
    ==================================================================
     
    1 # Copyright (C) 2005-2007, The Perl Foundation. 
     1# Copyright (C) 2005-2009, The Perl Foundation. 
    22# $Id$ 
    33 
    44package init::hints::mswin32; 
     
    3434    my $build_dir = $conf->data->get('build_dir'); 
    3535 
    3636    if ( $build_dir =~ /\s/ ) { 
    37         $conf->data->set( build_dir => Win32::GetShortPathName($build_dir) ); 
     37        $conf->data->set( build_dir => Win32::GetLongPathName($build_dir) ); 
    3838    } 
    3939 
    4040    if ($is_msvc) {