From a918236e2d73013a261ad015527ac5d5b98750e6 Mon Sep 17 00:00:00 2001
From: curt <curt>
Date: Mon, 19 May 2003 15:28:21 +0000
Subject: [PATCH] Fixes to the default.ils building script.

---
 scripts/perl/dafif/dafift2ils.pl | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

diff --git a/scripts/perl/dafif/dafift2ils.pl b/scripts/perl/dafif/dafift2ils.pl
index 8aceecde1..19cb9195a 100755
--- a/scripts/perl/dafif/dafift2ils.pl
+++ b/scripts/perl/dafif/dafift2ils.pl
@@ -328,13 +328,10 @@ sub load_fgfs() {
             my( $code ) = $icao;
             $code =~ s/^K//;
             if ( $ILS{$icao . $rwy} ne "" ) {
+                print "FGFS: Skipping $icao - $rwy - already exists\n";
                 # skip approaches already in FAA or DAFIFT data
-            } elsif ( $AIRPORTS{$icao} != 1 && $AIRPORTS{$code} != 1 ) {
-                # skip approaches if the FAA or DAFIFT data has any other
-                # approach already for this airport.  (Avoids carrying over
-                # extraneous data if an approach was deactivated or runway
-                # numbers were changed.)
             } elsif ( length( $icao ) < 4 || $icao =~ m/^K/ ) {
+                print "FGFS: Skipping $icao - $rwy - USA\n";
                 # skip USA approaches not found in FAA or DAFIFT data
             } else {
                 print "FGFS adding: $icao $rwy\n";