mirror of
https://github.com/samba-team/samba.git
synced 2025-08-02 00:22:11 +03:00
r8275: possibly a more portable way to export symbols in perl?
(This used to be commit d5153d16e1
)
This commit is contained in:
committed by
Gerald (Jerry) Carter
parent
514ce32a89
commit
1e5b309b4f
@ -7,8 +7,9 @@
|
||||
|
||||
package Parse::Pidl::NDR;
|
||||
|
||||
use Exporter 'import';
|
||||
@EXPORT_OK = qw(GetPrevLevel GetNextLevel);
|
||||
require Exporter;
|
||||
@ISA = qw(Exporter);
|
||||
@EXPORT = qw(GetPrevLevel GetNextLevel);
|
||||
|
||||
use strict;
|
||||
use Parse::Pidl::Typelist qw(hasType getType);
|
||||
|
@ -5,8 +5,9 @@
|
||||
|
||||
package Parse::Pidl::Typelist;
|
||||
|
||||
use Exporter 'import';
|
||||
@EXPORT_OK = qw(hasType getType);
|
||||
require Exporter;
|
||||
@ISA = qw(Exporter);
|
||||
@EXPORT = qw(hasType getType);
|
||||
|
||||
use Parse::Pidl::Util qw(has_property);
|
||||
use strict;
|
||||
|
@ -4,8 +4,9 @@
|
||||
# released under the GNU GPL
|
||||
package Parse::Pidl::Util;
|
||||
|
||||
use Exporter 'import';
|
||||
@EXPORT_OK = qw(has_property property_matches ParseExpr);
|
||||
require Exporter;
|
||||
@ISA = qw(Exporter);
|
||||
@EXPORT = qw(has_property property_matches ParseExpr);
|
||||
|
||||
use strict;
|
||||
|
||||
|
Reference in New Issue
Block a user