svn commit: samba r8275 - in branches/SAMBA_4_0/source/build/pidl/Parse/Pidl: .

[tridge at samba.org]

Author: tridge
Date: 2005-07-10 01:43:10 +0000 (Sun, 10 Jul 2005)
New Revision: 8275

WebSVN: http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=8275

Log:
possibly a more portable way to export symbols in perl?

Modified:
   branches/SAMBA_4_0/source/build/pidl/Parse/Pidl/NDR.pm
   branches/SAMBA_4_0/source/build/pidl/Parse/Pidl/Typelist.pm
   branches/SAMBA_4_0/source/build/pidl/Parse/Pidl/Util.pm


Changeset:
Modified: branches/SAMBA_4_0/source/build/pidl/Parse/Pidl/NDR.pm
===================================================================
--- branches/SAMBA_4_0/source/build/pidl/Parse/Pidl/NDR.pm	2005-07-10 01:16:02 UTC (rev 8274)
+++ branches/SAMBA_4_0/source/build/pidl/Parse/Pidl/NDR.pm	2005-07-10 01:43:10 UTC (rev 8275)
@@ -7,8 +7,9 @@
 
 package Parse::Pidl::NDR;
 
-use Exporter 'import';
- at EXPORT_OK = qw(GetPrevLevel GetNextLevel);
+require Exporter;
+ at ISA = qw(Exporter);
+ at EXPORT = qw(GetPrevLevel GetNextLevel);
 
 use strict;
 use Parse::Pidl::Typelist qw(hasType getType);

Modified: branches/SAMBA_4_0/source/build/pidl/Parse/Pidl/Typelist.pm
===================================================================
--- branches/SAMBA_4_0/source/build/pidl/Parse/Pidl/Typelist.pm	2005-07-10 01:16:02 UTC (rev 8274)
+++ branches/SAMBA_4_0/source/build/pidl/Parse/Pidl/Typelist.pm	2005-07-10 01:43:10 UTC (rev 8275)
@@ -5,8 +5,9 @@
 
 package Parse::Pidl::Typelist;
 
-use Exporter 'import';
- at EXPORT_OK = qw(hasType getType);
+require Exporter;
+ at ISA = qw(Exporter);
+ at EXPORT = qw(hasType getType);
 
 use Parse::Pidl::Util qw(has_property);
 use strict;

Modified: branches/SAMBA_4_0/source/build/pidl/Parse/Pidl/Util.pm
===================================================================
--- branches/SAMBA_4_0/source/build/pidl/Parse/Pidl/Util.pm	2005-07-10 01:16:02 UTC (rev 8274)
+++ branches/SAMBA_4_0/source/build/pidl/Parse/Pidl/Util.pm	2005-07-10 01:43:10 UTC (rev 8275)
@@ -4,8 +4,9 @@
 # released under the GNU GPL
 package Parse::Pidl::Util;
 
-use Exporter 'import';
- at EXPORT_OK = qw(has_property property_matches ParseExpr);
+require Exporter;
+ at ISA = qw(Exporter);
+ at EXPORT = qw(has_property property_matches ParseExpr);
 
 use strict;