diff options
Diffstat (limited to 'regress/usr.bin')
| -rw-r--r-- | regress/usr.bin/mdoclint/mdoclint | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/regress/usr.bin/mdoclint/mdoclint b/regress/usr.bin/mdoclint/mdoclint index 31ba8af245b..9a61a02924a 100644 --- a/regress/usr.bin/mdoclint/mdoclint +++ b/regress/usr.bin/mdoclint/mdoclint @@ -1,6 +1,6 @@ #!/usr/bin/perl # -# $OpenBSD: mdoclint,v 1.71 2017/06/23 19:16:49 schwarze Exp $ +# $OpenBSD: mdoclint,v 1.72 2017/06/23 19:56:57 schwarze Exp $ # $NetBSD: mdoclint,v 1.77 2017/06/08 10:19:56 wiz Exp $ # # Copyright (c) 2001-2017 Thomas Klausner @@ -209,7 +209,6 @@ sub new my $o = { mandoc_p => 1, all => [], - lastline => '', changes => 0, shseen => {}, current_section_header => '', @@ -298,13 +297,8 @@ sub process_line if (/^\.TH\s+/o) { $s->warning("not mandoc") if $opt_m; $s->{mandoc_p} = 0; -# /^.TH\s*[\w-_".]+\s*([1-9])/; -# $section = $1; return "$_\n"; } -# if (/^.Dt\s*[\w-_".]+\s*([1-9])/) { -# $section = $1; -# } if (/^\.Dt\s+/o) { if (/^\.Dt\s+(?:[A-Z\d._-]+)\s+($sections_re)(?:\s+$arches_re)?$/o) { $s->{sec} = $1; @@ -363,7 +357,6 @@ sub process_line } } } - $s->{lastline} = $_; return "$_\n"; } |