Index: trunk/tools/stack_inputs.pl
===================================================================
--- trunk/tools/stack_inputs.pl	(revision 24828)
+++ trunk/tools/stack_inputs.pl	(revision 24829)
@@ -71,5 +71,5 @@
 foreach my $warp_path ( @$warps ) {
     if (defined $muggle) {
-        my @warp = split /\//, $warp;
+        my @warp = split /\//, $warp_path;
         my $last = pop @warp;
         push @warp, "SR_$last";