From 4c7ddc2010ddeaca45d40140993b05d43b7fe030 Mon Sep 17 00:00:00 2001 From: ivan Date: Thu, 27 Jun 2002 09:23:05 +0000 Subject: [PATCH] null bind exports --- FS/FS/part_export/bind.pm | 7 +++++++ FS/FS/part_export/bind_slave.pm | 7 +++++++ FS/t/part_export-bind.t | 5 +++++ FS/t/part_export-bind_slave.t | 5 +++++ 4 files changed, 24 insertions(+) create mode 100644 FS/FS/part_export/bind.pm create mode 100644 FS/FS/part_export/bind_slave.pm create mode 100644 FS/t/part_export-bind.t create mode 100644 FS/t/part_export-bind_slave.t diff --git a/FS/FS/part_export/bind.pm b/FS/FS/part_export/bind.pm new file mode 100644 index 000000000..b72c9bdb0 --- /dev/null +++ b/FS/FS/part_export/bind.pm @@ -0,0 +1,7 @@ +package FS::part_export::bind; + +use vars qw(@ISA); +use FS::part_export::null; + +@ISA = qw(FS::part_export::null); + diff --git a/FS/FS/part_export/bind_slave.pm b/FS/FS/part_export/bind_slave.pm new file mode 100644 index 000000000..ebb29c1d7 --- /dev/null +++ b/FS/FS/part_export/bind_slave.pm @@ -0,0 +1,7 @@ +package FS::part_export::bind_slave; + +use vars qw(@ISA); +use FS::part_export::null; + +@ISA = qw(FS::part_export::null); + diff --git a/FS/t/part_export-bind.t b/FS/t/part_export-bind.t new file mode 100644 index 000000000..d0c96be40 --- /dev/null +++ b/FS/t/part_export-bind.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::part_export::bind; +$loaded=1; +print "ok 1\n"; diff --git a/FS/t/part_export-bind_slave.t b/FS/t/part_export-bind_slave.t new file mode 100644 index 000000000..c6a038610 --- /dev/null +++ b/FS/t/part_export-bind_slave.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::part_export::bind_slave; +$loaded=1; +print "ok 1\n"; -- 2.11.0