From: Graham Knop <haarg@haarg.org>
Date: Mon, 21 Jan 2013 04:54:49 +0000 (-0500)
Subject: fix my stupid typo to fix ancient perls
X-Git-Tag: v0.009013~2
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=87108237c760fbf54141056f6f3a0f0a62fb1001;p=p5sagit%2FApp-FatPacker.git

fix my stupid typo to fix ancient perls
---

diff --git a/lib/App/FatPacker.pm b/lib/App/FatPacker.pm
index 62411b9..881c38f 100644
--- a/lib/App/FatPacker.pm
+++ b/lib/App/FatPacker.pm
@@ -213,7 +213,7 @@ sub script_command_file {
         if ($] < 5.008) {
           return sub {
             return 0 unless length $fat;
-            $text =~ s/^([^\n]*\n?)//;
+            $fat =~ s/^([^\n]*\n?)//;
             $_ = $1;
             return 1;
           };