mirror of
https://git.FreeBSD.org/src.git
synced 2024-12-16 10:20:30 +00:00
Remove redundant spaces in the whole line, not only the first occurrence.
(not that anyone actually reads the created .c and .h files :)
This commit is contained in:
parent
31deecc479
commit
3d9a083508
Notes:
svn2git
2020-12-20 02:59:44 +00:00
svn path=/head/; revision=50009
@ -35,7 +35,7 @@
|
||||
# From @(#)makedevops.sh 1.1 1998/06/14 13:53:12 dfr Exp $
|
||||
# From @(#)makedevops.sh ?.? 1998/10/05
|
||||
#
|
||||
# $Id: makedevops.pl,v 1.7 1999/05/10 17:06:13 dfr Exp $
|
||||
# $Id: makedevops.pl,v 1.8 1999/05/10 17:45:49 n_hibma Exp $
|
||||
|
||||
#
|
||||
# Script to produce device front-end sugar.
|
||||
@ -296,7 +296,7 @@ foreach $src ( @filenames ) {
|
||||
#
|
||||
$line =~ s/^\s+//; # remove leading ...
|
||||
$line =~ s/\s+$//; # ... and trailing whitespace
|
||||
$line =~ s/\s+/ /; # remove double spaces
|
||||
$line =~ s/\s+/ /g; # remove double spaces
|
||||
|
||||
@arguments = split m/\s*;\s*/, $line;
|
||||
@varnames = (); # list of varnames
|
||||
@ -324,7 +324,7 @@ foreach $src ( @filenames ) {
|
||||
$arguments = join(", ", @arguments);
|
||||
$varnames = join(", ", @varnames);
|
||||
|
||||
$default = "0" if $default eq "";
|
||||
$default = "0" if $default eq "";
|
||||
|
||||
if ( $hfile ) {
|
||||
# the method description
|
||||
|
Loading…
Reference in New Issue
Block a user