chiark / gitweb /
Working on new options -C and -g etc.
authorianmdlvl <ianmdlvl>
Mon, 31 Dec 2001 14:25:54 +0000 (14:25 +0000)
committerianmdlvl <ianmdlvl>
Mon, 31 Dec 2001 14:25:54 +0000 (14:25 +0000)
scripts/named-conf

index 1c20660..2dada62 100755 (executable)
@@ -8,10 +8,12 @@ use vars qw($etcfile $where);
 $etcfile= "/etc/bind/chiark-conf-gen.zones";
 $where= '<built-in>';
 
-use vars qw($mode $verbosity $debug);
+use vars qw($mode $verbosity $debug $needglue $localonly);
 $mode= '';
 $verbosity= 1;
 $debug= 0;
+$needglue= 0;
+$localonly= 0;
 
 use vars qw($dig_owner $dig_type $dig_rdata);
 
@@ -32,6 +34,7 @@ while (@ARGV && $ARGV[0] =~ m/^\-/) {
            elsif (s/^v//) { $verbosity=2; }
            elsif (s/^q//) { $verbosity=0; }
            elsif (s/^D//) { $debug++; }
+           elsif (s/^g//) { $needglue=0; }
            elsif (s/^C//) { $etcfile= soarg(); $where= '-C option'; }
            else { usageerr("unknown option -$&"); }
        }