Back out the -w, option strict and our($...). They don't work for me and
have broken the kernel build.
This commit is contained in:
parent
cd778f0244
commit
bc5fc9140e
Notes:
svn2git
2020-12-20 02:59:44 +00:00
svn path=/head/; revision=85903
@ -1,4 +1,4 @@
|
||||
#!/usr/bin/perl -w
|
||||
#!/usr/bin/perl
|
||||
#
|
||||
# Copyright (c) 1992, 1993
|
||||
# The Regents of the University of California. All rights reserved.
|
||||
@ -42,7 +42,7 @@
|
||||
# Script to produce kobj front-end sugar.
|
||||
#
|
||||
|
||||
use strict;
|
||||
#use strict;
|
||||
use Getopt::Std;
|
||||
|
||||
my $line_width = 80;
|
||||
@ -55,7 +55,7 @@ my $intname;
|
||||
|
||||
# Process the command line
|
||||
#
|
||||
our ($opt_c, $opt_d, $opt_h, $opt_l, $opt_p);
|
||||
#our ($opt_c, $opt_d, $opt_h, $opt_l, $opt_p);
|
||||
getopts('cdhl:p')
|
||||
or usage();
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user