X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~cjwatson/git?p=bin.git;a=blobdiff_plain;f=get-corr;h=d7b889703e80026d152701a45dad458b97117cae;hp=a1edfdafef70c48e7c30bc1bbb953047af214405;hb=cba2801c00cc8a5f1653cffb9d0ec435e2c3671e;hpb=88c7e302a60194f68bc1b6d20c1547b62e1436d3

diff --git a/get-corr b/get-corr
old mode 100644
new mode 100755
index a1edfda..d7b8897
--- a/get-corr
+++ b/get-corr
@@ -1,5 +1,4 @@
 #! /usr/bin/perl -w
-use diagnostics;
 use strict;
 
 use Mail::Util qw(read_mbox);
@@ -41,7 +40,7 @@ foreach my $folder (@folders)
 	    }
 	    if ($scan)
 	    {
-		if ($line =~ /cjw44/)
+		if ($line =~ /cjw44|cjwatson/)
 		{
 		    $print_from = 1;
 		    last;