diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2007-03-31 11:30:09 -0400 |
|---|---|---|
| committer | Steve Peters <steve@fisharerojo.org> | 2007-04-01 13:10:11 +0000 |
| commit | 4764e399f58c2e035a482e18aea2bd8c44fd9083 (patch) | |
| tree | a3223a823f2ae68027ab629b4746132501179ad9 /lib/constant.pm | |
| parent | 2eacba2f038fca0c7ce4713e73ef229faa3f3caa (diff) | |
| download | perl-4764e399f58c2e035a482e18aea2bd8c44fd9083.tar.gz | |
Symbian sync
Message-ID: <460EB6C1.4020406@iki.fi>
p4raw-id: //depot/perl@30824
Diffstat (limited to 'lib/constant.pm')
| -rw-r--r-- | lib/constant.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/constant.pm b/lib/constant.pm index 83714a89a4..f1b4d73f59 100644 --- a/lib/constant.pm +++ b/lib/constant.pm @@ -109,7 +109,7 @@ sub import { # constants from cv_const_sv are read only. So we have to: Internals::SvREADONLY($scalar, 1); $symtab->{$name} = \$scalar; - Internals::inc_sub_generation; + &Internals::inc_sub_generation; } else { *$full_name = sub () { $scalar }; } |