projects
/
perl-landing-airplanes.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
reduce drop point on strip A
[perl-landing-airplanes.git]
/
trace-path.pl
diff --git
a/trace-path.pl
b/trace-path.pl
index
b97779c
..
9a6e865
100755
(executable)
--- a/
trace-path.pl
+++ b/
trace-path.pl
@@
-167,7
+167,7
@@
sub curve {
$app->sync;
push @airplanes, Airplane->new( $app );
- $airplanes[-1]->set_path( @
path
);
+ $airplanes[-1]->set_path( @
curve
);
reset_path;
}