From 6f302831426c72fc1f13b124ae8152fadd2321fb Mon Sep 17 00:00:00 2001
From: Peter Palfrader <peter@palfrader.org>
Date: Mon, 12 Aug 2002 03:17:17 +0000
Subject: Use correct open mode

---
 Echolot/Mailin.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'Echolot')

diff --git a/Echolot/Mailin.pm b/Echolot/Mailin.pm
index 097a42f..b50a05b 100644
--- a/Echolot/Mailin.pm
+++ b/Echolot/Mailin.pm
@@ -1,7 +1,7 @@
 package Echolot::Mailin;
 
 # (c) 2002 Peter Palfrader <peter@palfrader.org>
-# $Id: Mailin.pm,v 1.7 2002/08/12 03:06:53 weasel Exp $
+# $Id: Mailin.pm,v 1.8 2002/08/12 03:17:17 weasel Exp $
 #
 
 =pod
@@ -109,7 +109,7 @@ sub read_mbox($) {
 	my $mail = [];
 	my $blank = 1;
 
-	open(FH, '<+', $file) or
+	open(FH, '+<', $file) or
 		cluck("cannot open '$file': $!\n"),
 		return undef;
 	flock(FH, LOCK_EX) or
-- 
cgit v1.2.3