Changeset 253

Timestamp:

12/31/10 14:40:34 (13 years ago)

Author:

nanardon

Message:

• remove wrong my dcl

File:

• server/trunk/admin/bin/sophie_load (modified) (1 diff)

server/trunk/admin/bin/sophie_load

@@ -30 +30 @@
 
 my $string;
-if (my $file) {
+if ($file) {
     open($handle, '<', $file) || die "can't open file $!";
     $string = join('', <$handle>);