From 14dc7dbba7148721b24bd2f561af3ff7cce22931 Mon Sep 17 00:00:00 2001
From: Colin Watson <cjwatson@chiark.greenend.org.uk>
Date: Sat, 28 Sep 2002 11:04:56 +0000
Subject: [PATCH] bin: Drop 'use diagnostics;' from all Perl scripts.

---
 dctrl-mailbox | 1 -
 expandvars    | 1 -
 get-corr      | 1 -
 mailsort      | 1 -
 taskbot       | 1 -
 verify-status | 1 -
 6 files changed, 6 deletions(-)

diff --git a/dctrl-mailbox b/dctrl-mailbox
index c5c65d7..851ea0a 100755
--- a/dctrl-mailbox
+++ b/dctrl-mailbox
@@ -1,5 +1,4 @@
 #! /usr/bin/perl -w
-use diagnostics;
 use strict;
 use Date::Format;
 
diff --git a/expandvars b/expandvars
index a7ea667..68f56c8 100755
--- a/expandvars
+++ b/expandvars
@@ -1,5 +1,4 @@
 #! /usr/bin/perl -w
-use diagnostics;
 use strict;
 use Getopt::Long;
 
diff --git a/get-corr b/get-corr
index a1edfda..03f5f31 100755
--- a/get-corr
+++ b/get-corr
@@ -1,5 +1,4 @@
 #! /usr/bin/perl -w
-use diagnostics;
 use strict;
 
 use Mail::Util qw(read_mbox);
diff --git a/mailsort b/mailsort
index e13bc17..cca0d64 100755
--- a/mailsort
+++ b/mailsort
@@ -1,5 +1,4 @@
 #! /usr/bin/perl -w
-use diagnostics;
 use strict;
 use Date::Parse;
 
diff --git a/taskbot b/taskbot
index c17621f..5e4007c 100755
--- a/taskbot
+++ b/taskbot
@@ -1,5 +1,4 @@
 #! /usr/bin/perl -w
-use diagnostics;
 use strict;
 
 use Net::IRC;
diff --git a/verify-status b/verify-status
index e3faa0c..117386b 100755
--- a/verify-status
+++ b/verify-status
@@ -1,5 +1,4 @@
 #! /usr/bin/perl -w
-use diagnostics;
 use strict;
 
 my $verbose = 0;
-- 
2.30.2