diff options
author | Andrew Tridgell <tridge@samba.org> | 2003-12-15 08:58:00 +0000 |
---|---|---|
committer | Andrew Tridgell <tridge@samba.org> | 2003-12-15 08:58:00 +0000 |
commit | a90db73efd985283a3402c69fae94d10813b22d8 (patch) | |
tree | ab39b40eafe1133aeb1e7c0c3e1011718a6b0b20 /source4/build/pidl/util.pm | |
parent | 328957981251e6f98f89f1f1a3895a44253f8da9 (diff) | |
download | samba-a90db73efd985283a3402c69fae94d10813b22d8.tar.gz samba-a90db73efd985283a3402c69fae94d10813b22d8.tar.bz2 samba-a90db73efd985283a3402c69fae94d10813b22d8.zip |
make pidl no longer dependent on Data::Dumper, which isn't installed
on some systems
(This used to be commit a4aa9168c0f80cf6e758c380d41335db50d06869)
Diffstat (limited to 'source4/build/pidl/util.pm')
-rw-r--r-- | source4/build/pidl/util.pm | 14 |
1 files changed, 4 insertions, 10 deletions
diff --git a/source4/build/pidl/util.pm b/source4/build/pidl/util.pm index dc6fd35f0c..8331e115d3 100644 --- a/source4/build/pidl/util.pm +++ b/source4/build/pidl/util.pm @@ -4,8 +4,6 @@ # released under the GNU GPL package util; -use Data::Dumper; - ##################################################################### # load a data structure from a file (as saved with SaveStructure) sub LoadStructure($) @@ -136,9 +134,10 @@ sub ChangeExtension($$) # save a data structure into a file sub SaveStructure($$) { - my($filename) = shift; - my($v) = shift; - FileSave($filename, Dumper($v)); + require Data::Dumper; + my($filename) = shift; + my($v) = shift; + FileSave($filename, Data::Dumper::Dumper($v)); } ##################################################################### @@ -363,10 +362,5 @@ sub is_inline_array($) return 0; } -sub dump($) -{ - print Dumper shift; -} - 1; |