summaryrefslogtreecommitdiff
path: root/lib/Travelynx/Controller/Traveling.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Travelynx/Controller/Traveling.pm')
-rwxr-xr-xlib/Travelynx/Controller/Traveling.pm5
1 files changed, 2 insertions, 3 deletions
diff --git a/lib/Travelynx/Controller/Traveling.pm b/lib/Travelynx/Controller/Traveling.pm
index 29af8f2..4d3c7d5 100755
--- a/lib/Travelynx/Controller/Traveling.pm
+++ b/lib/Travelynx/Controller/Traveling.pm
@@ -488,8 +488,7 @@ sub map_history {
next;
}
- my $key
- = $from_eva . '!' . $to_eva . '!' . $from_index . '!' . $to_index;
+ my $key = $from_eva . '!' . $to_eva . '!' . ( $to_index - $from_index );
if ( $seen{$key} ) {
next;
@@ -498,7 +497,7 @@ sub map_history {
$seen{$key} = 1;
# direction does not matter at the moment
- $key = $to_eva . '!' . $from_eva . '!' . $to_index . '!' . $from_index;
+ $key = $to_eva . '!' . $from_eva . '!' . ( $to_index - $from_index );
$seen{$key} = 1;
@polyline = @polyline[ $from_index .. $to_index ];