Skip Menu |
 

This queue is for tickets about the App-FatPacker CPAN distribution.

Report information
The Basics
Id: 63466
Status: resolved
Priority: 0/
Queue: App-FatPacker

People
Owner: Nobody in particular
Requestors: GUGOD [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in: 0.009003
Fixed in: (no value)

Attachments


Subject: Filed to generate proper code segment
Download (untitled) / with headers
text/plain 244b
When the packed module does not end with "\n", it generates a segment with mis-placed here- doc marker at the end. File::Path::Tiny module is an instance of such module. The solution in the attached path is to add that \n when it's missing.
Subject: fatpacker-missing-newline.diff
diff --git a/lib/App/FatPacker.pm b/lib/App/FatPacker.pm index 2f39841..4399341 100644 --- a/lib/App/FatPacker.pm +++ b/lib/App/FatPacker.pm @@ -182,7 +182,7 @@ sub script_command_file { my @segments = map { (my $stub = $_) =~ s/\.pm$//; my $name = uc join '_', split '/', $stub; - my $data = $files{$_}; $data =~ s/^/ /mg; + my $data = $files{$_}; $data =~ s/^/ /mg; $data =~ s/(?<!\n)\z/\n/; '$fatpacked{'.perlstring($_).qq!} = <<'${name}';\n! .qq!${data}${name}\n!; } sort keys %files;
Thanks, applied and in 0.9.5.


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.