diff options
| author | Andreas Koenig <k@anna.mind.de> | 1996-02-08 17:20:12 +0100 |
|---|---|---|
| committer | Andy Dougherty <doughera@lafcol.lafayette.edu> | 1996-02-08 17:20:12 +0100 |
| commit | 3c4fed689366bb9b31aec414baf1cd069348a33f (patch) | |
| tree | bad8957706e48c63af58912f3fabed21fac807ac | |
| parent | 5be1dfc7c0716602e7742d69535890ac09c550f6 (diff) | |
| download | perl-3c4fed689366bb9b31aec414baf1cd069348a33f.tar.gz | |
DATA filehandle not closed in Symbol.pm
| -rw-r--r-- | lib/Symbol.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/Symbol.pm b/lib/Symbol.pm index ccc12b67c7..a12e6dcb30 100644 --- a/lib/Symbol.pm +++ b/lib/Symbol.pm @@ -61,6 +61,7 @@ while (<DATA>) { chomp; $global{$_} = 1; } +close DATA; sub gensym () { my $name = "GEN" . $genseq++; |