Permalink
Browse files

import version 1.03 from backpan

  • Loading branch information...
1 parent 8663aa0 commit 62413e5df3b9391c46734e9f65af924652039a91 @fperrad committed with May 21, 2002
Showing with 5 additions and 1 deletion.
  1. +3 −0 Changes
  2. +1 −1 node.pm
  3. +1 −0 symbtab.pm
View
3 Changes
@@ -1,5 +1,8 @@
Revision history for Perl extension CORBA::IDL.
+1.03 Tue May 21 09:30:00 2002
+ - bug when reopen a module
+
1.02 Tue May 14 08:30:00 2002
- some improvements (union, valuetype, ...)
View
2 node.pm
@@ -7,7 +7,7 @@ use UNIVERSAL;
package node;
use vars qw($VERSION);
-$VERSION = '1.02';
+$VERSION = '1.03';
sub new {
my $proto = shift;
View
1 symbtab.pm
@@ -181,6 +181,7 @@ sub OpenModule {
if (defined $prev) {
if ($prev->isa('Module')) {
# reopen
+ $node->{coll} = $g_name;
return;
} else {
$self->{msg} ||= "Identifier '$name' already exists.\n";

0 comments on commit 62413e5

Please sign in to comment.