[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
texinfo/tp/Texinfo Common.pm
From: |
Patrice Dumas |
Subject: |
texinfo/tp/Texinfo Common.pm |
Date: |
Sun, 13 Nov 2011 23:57:38 +0000 |
CVSROOT: /sources/texinfo
Module name: texinfo
Changes by: Patrice Dumas <pertusus> 11/11/13 23:57:38
Modified files:
tp/Texinfo : Common.pm
Log message:
Pass the filehandle together with unclosed_files.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/Texinfo/Common.pm?cvsroot=texinfo&r1=1.98&r2=1.99
Patches:
Index: Common.pm
===================================================================
RCS file: /sources/texinfo/texinfo/tp/Texinfo/Common.pm,v
retrieving revision 1.98
retrieving revision 1.99
diff -u -b -r1.98 -r1.99
--- Common.pm 13 Nov 2011 23:55:21 -0000 1.98
+++ Common.pm 13 Nov 2011 23:57:38 -0000 1.99
@@ -772,7 +772,7 @@
binmode(STDOUT, ":encoding($encoding)") if ($encoding);
if ($self) {
push @{$self->{'opened_files'}}, $file;
- $self->{'unclosed_files'}->{$file} = 1;
+ $self->{'unclosed_files'}->{$file} = \*STDOUT;
}
return \*STDOUT;
}
@@ -790,7 +790,7 @@
}
if ($self) {
push @{$self->{'opened_files'}}, $file;
- $self->{'unclosed_files'}->{$file} = 1;
+ $self->{'unclosed_files'}->{$file} = $filehandle;
}
return $filehandle;
}
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- texinfo/tp/Texinfo Common.pm,
Patrice Dumas <=