Author: pebender
Date: Tue Jan 6 19:15:52 2009
New Revision: 4176
Modified:
trunk/gar-minimyth/script/perl/perl-MiniMyth/checksums
trunk/gar-minimyth/script/perl/perl-MiniMyth/files/MiniMyth.pm
Log:
- Fixed a bug introduced in commit #4168.
Modified: trunk/gar-minimyth/script/perl/perl-MiniMyth/checksums
==============================================================================
--- trunk/gar-minimyth/script/perl/perl-MiniMyth/checksums (original)
+++ trunk/gar-minimyth/script/perl/perl-MiniMyth/checksums Tue Jan 6
19:15:52 2009
@@ -1 +1 @@
-e95d178496548f380f1890e9a4bde351 download/MiniMyth.pm
+68490a5e32d96e6c071fac637438cef1 download/MiniMyth.pm
Modified: trunk/gar-minimyth/script/perl/perl-MiniMyth/files/MiniMyth.pm
==============================================================================
--- trunk/gar-minimyth/script/perl/perl-MiniMyth/files/MiniMyth.pm
(original)
+++ trunk/gar-minimyth/script/perl/perl-MiniMyth/files/MiniMyth.pm Tue Jan
6 19:15:52 2009
@@ -1120,10 +1120,11 @@
{
if ($self->var_get('MM_ROOTFS_IMAGE'))
{
- my $file_0 = $self->var_get('MM_ROOTFS_IMAGE') . '/' .
$file;
+ my $file_0 = $self->var_get('MM_ROOTFS_IMAGE');
$file_0 =~ s/\/+/\//g;
$file_0 =~ s/[^\/]+$//g;
$file_0 =~ s/\/$//g;
+ $file_0 .= '/' . $file;
push(@list, $self->var_get('MM_MINIMYTH_BOOT_URL') .
$file_0);
}
else
--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups
"minimyth-commits" group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/minimyth-commits?hl=en
-~----------~----~----~----~------~----~------~--~---
