I have prepared a hack solving described issue with portable perl.
Yes, it is ugly but it works for me.
Please consider enclosed patch (or any other way to fix Padre on strawberry
portable perl)
FYI: Latest stable strawberry perl portable is available at:
http://strawberry-perl.googlecode.com/files/strawberry-perl-5.14.2.1-32bit-portable.zip
--
kmx
On 22.12.2011 16:15, kmx wrote:
> I am using strawberry perl portable from:
> http://strawberryperl.com/package/kmx/p5.14.2.1-RC/
>
> and yes it is still issue on Padre 0.92
>
> --
> kmx
>
>
> On 22.12.2011 11:58, Ahmad Zawawi wrote:
>>
>> Hi Kmx,
>>
>> Sorry on the long time to answer on this one. Could you provide more
>> details which strawberry portable you're using and if this is still an
>> issue with Padre 0.92?
>>
>> Also thanks for strawberry perl 5.14.2 :)
>>
>> 2011/11/25 kmx <k...@atlas.cz <mailto:k...@atlas.cz>>
>>
>>
>> On 14.11.2011 12:45, kmx wrote:
>>> On 7.11.2011 10:41, kmx wrote:
>>>> Hi,
>>>>
>>>> I have experienced the following failure on my Windows 7 box:
>>>>
>>>> t/04-config.t .............. 2/298
>>>> # Failed test '->bin_shell defaults ok'
>>>> # at t/04-config.t line 46.
>>>> # got: 'Z:\PORTAB~1\cmd.exe'
>>>> # expected: 'cmd.exe'
>>>> # Looks like you failed 1 test of 298.
>>>> t/04-config.t .............. Dubious, test returned 1 (wstat 256,
>>>> 0x100)
>>>>
>>>> I expect 'Z:\PORTAB~1\cmd.exe' to be a short form of
>>>> 'z:\portable4testing\cmd.exe' which is of course a non existing
>>>> file (z:\portable4testing is where I have unpacked portable
>>>> strawberry perl).
>>>
>>> My further investigation revealed that the failure is related to
>>> Padre::Portable stuff, namely sub code() in
>>> lib\Padre\Config\Setting.pm
>>>
>>> The thing is that config item bin_shell (which is normally
>>> 'cmd.exe') is transformed via Padre::Portable::thaw('cmd.exe') (see
>>> section under the comment "# Auto-translating accessors for
>>> Portable mode") which turns 'cmd.exe' into
>>> 'z:\portable4testing\cmd.exe'.
>>
>> Could somebody create a ticket in Padre's bug tracking system? I am
>> not allowed to create a bug report.
>>
>> --
>> kmx
>>
>> _______________________________________________
>> Padre-dev mailing list
>> Padre-dev@perlide.org <mailto:Padre-dev@perlide.org>
>> http://mail.perlide.org/mailman/listinfo/padre-dev
>>
>>
>>
>> _______________________________________________
>> Padre-dev mailing list
>> Padre-dev@perlide.org
>> http://mail.perlide.org/mailman/listinfo/padre-dev
>>
diff -ru Padre-0.96\lib\Padre\Config\Setting.pm
Padre-0.96_patched\lib\Padre\Config\Setting.pm
--- Padre-0.96\lib\Padre\Config\Setting.pm Thu Apr 19 14:36:17 2012
+++ Padre-0.96_patched\lib\Padre\Config\Setting.pm Wed May 09 21:54:25 2012
@@ -156,7 +156,7 @@
my \$path = ( exists \$config->{$name} and -e \$config->{$name} )
? \$config->{$name}
: \$DEFAULT{$name};
- return Padre::Portable::thaw(\$path);
+ return \$path eq 'cmd.exe' ? \$path : Padre::Portable::thaw(\$path);
}
END_PERL
}
_______________________________________________
Padre-dev mailing list
Padre-dev@perlide.org
http://mail.perlide.org/mailman/listinfo/padre-dev
