gitzone

commit ebd0e9a62d5ca231cfe27db80d2ab2b059a762b2
parent 43c5984e73ab7974ebe569dc7be69ca57b5ac91e
Author: tg(x) <*@tg-x.net>
Date:   Sat,  5 Mar 2011 14:52:59 +0100

-

Diffstat:
M
bin/gitzone
 | 
6
+-----

1 file changed, 1 insertion(+), 5 deletions(-)
diff --git a/bin/gitzone b/bin/gitzone
@@ -32,7 +32,7 @@ our ($zone_dir, $git, $named_checkzone, $rndc, $class, $default_view, $update_re
 my ($config_file, $cmd) = @ARGV;
 do $config_file or die "Can't load config: $!\n";
 
-my (%files, %inc_files, @zones, @changed_files, $date, $cleanup);
+my (%files, @zones, @changed_files, $date, $cleanup);
 delete $ENV{GIT_DIR};
 
 !-e $lock_file or die "Error: lock file exists\n";
@@ -160,11 +160,7 @@ sub process_file {
       }
     } else {
       if ($n == 1 && /^;INCLUDED_BY\s+(.*)$/) {
-        # add files listed after ;INCLUDED_BY to %inc_files
         @inc_by = split /\s+/, $1;
-        for (@inc_by) {
-          $inc_files{$_} = 0 unless exists $files{$_};
-        }
       }
     }
     push @newfile, $line;