From 824908642a0908b499b52397a20520d8040b434f Mon Sep 17 00:00:00 2001
From: schwarze <schwarze@openbsd.org>
Date: Fri, 23 Jun 2017 19:56:57 +0000
Subject: [PATCH] delete unused "lastline" state variable and some commented
 out lines; no functional change

---
 regress/usr.bin/mdoclint/mdoclint | 9 +--------
 1 file changed, 1 insertion(+), 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";
 }
 
-- 
2.20.1