File tree Expand file tree Collapse file tree 1 file changed +3
-3
lines changed
postprocessing/split_ncvars Expand file tree Collapse file tree 1 file changed +3
-3
lines changed Original file line number Diff line number Diff line change 139
139
# generate variable list (if not user supplied)
140
140
if (!@varlist ) {
141
141
if (!$Opt {STATIC }) {
142
- print tailname($list_ncvars )." -t0123 $file \n " if $Opt {VERBOSE } > 1;
143
- @varlist = split /\n/, ` $list_ncvars -t0123 $file ` ;
142
+ print tailname($list_ncvars )." -t01234 $file \n " if $Opt {VERBOSE } > 1;
143
+ @varlist = split /\n/, ` $list_ncvars -t01234 $file ` ;
144
144
} else {
145
145
print tailname($list_ncvars )." -s0123 $file \n " if $Opt {VERBOSE } > 1;
146
146
@varlist = split /\n/, ` $list_ncvars -s0123 $file ` ;
@@ -789,7 +789,7 @@ sub variable_log {
789
789
790
790
open (OUT," > $prtfile " ) || die " Cannot open $prtfile for output" ;
791
791
792
- foreach my $var (split /\n/, ` $list_ncvars -t0123 $ncfile ` ) {
792
+ foreach my $var (split /\n/, ` $list_ncvars -t01234 $ncfile ` ) {
793
793
my @out ;
794
794
$var =~ s / ^\s +// ; $var =~ s /\s +$// ;
795
795
push @out , $var ;
You can’t perform that action at this time.
0 commit comments