[prev in list] [next in list] [prev in thread] [next in thread]
List: lon-capa-cvs
Subject: [LON-CAPA-cvs] cvs: rat / lonuserstate.pm
From: raeburn <lon-capa-cvs () mail ! lon-capa ! org>
Date: 2006-05-30 19:11:38
Message-ID: cvsraeburn1149016298 () cvsserver
[Download RAW message or body]
raeburn Tue May 30 15:11:38 2006 EDT
Modified files:
/rat lonuserstate.pm
Log:
Closing filehandle after reading.
Index: rat/lonuserstate.pm
diff -u rat/lonuserstate.pm:1.114 rat/lonuserstate.pm:1.115
--- rat/lonuserstate.pm:1.114 Tue May 30 13:15:10 2006
+++ rat/lonuserstate.pm Tue May 30 15:11:37 2006
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Construct and maintain state and binary representation of course for user
#
-# $Id: lonuserstate.pm,v 1.114 2006/05/30 17:15:10 www Exp $
+# $Id: lonuserstate.pm,v 1.115 2006/05/30 19:11:37 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -686,8 +686,9 @@
if (-e $fn) {
my @conditions=();
{
- open(my $fh,$fn);
+ open(my $fh,"<$fn");
@conditions=<$fh>;
+ close($fh);
}
my $safeeval = new Safe;
my $safehole = new Safe::Hole;
_______________________________________________
LON-CAPA-cvs mailing list
LON-CAPA-cvs@mail.lon-capa.org
http://mail.lon-capa.org/mailman/listinfo/lon-capa-cvs
[prev in list] [next in list] [prev in thread] [next in thread]
Configure |
About |
News |
Add a list |
Sponsored by KoreLogic