Fix a typo in generate-mouse-tiny.pl

[gitmo/Mouse.git] / author / generate-mouse-tiny.pl

diff --git a/author/generate-mouse-tiny.pl b/author/generate-mouse-tiny.pl
index 0fd1963..71d6b60 100755 (executable)
--- a/author/generate-mouse-tiny.pl
+++ b/author/generate-mouse-tiny.pl
@@ -54,7 +54,7 @@ for my $file (uniq
     $contents =~ s/__END__\b.*//s;          # remove documentation
     $contents =~ s/1;\n*$//;                # remove success indicator
 
-    $mouse_tiny .= "BEGIN{ # #file\n";
+    $mouse_tiny .= "BEGIN{ # $file\n";
     $mouse_tiny .= $contents;
     $mouse_tiny .= "}\n";
 }