From e7fc7ebf927a7ab7159ad3cc8fa1530d7ce22a5a Mon Sep 17 00:00:00 2001 From: ivan Date: Wed, 24 Mar 2004 14:22:04 +0000 Subject: [PATCH] adding passwdfile export base class --- FS/FS/part_export/passwdfile.pm | 18 ++++++++++++++++++ FS/MANIFEST | 1 + FS/t/part_export-passwdfile.t | 5 +++++ 3 files changed, 24 insertions(+) create mode 100644 FS/FS/part_export/passwdfile.pm create mode 100644 FS/t/part_export-passwdfile.t diff --git a/FS/FS/part_export/passwdfile.pm b/FS/FS/part_export/passwdfile.pm new file mode 100644 index 000000000..2978d2503 --- /dev/null +++ b/FS/FS/part_export/passwdfile.pm @@ -0,0 +1,18 @@ +package FS::part_export::passwdfile; + +use strict; +use vars qw(@ISA %options); +use Tie::IxHash; +use FS::part_export::null; + +@ISA = qw(FS::part_export::null); + +tie %options, 'Tie::IxHash', + 'crypt' => { label=>'Password encryption', + type=>'select', options=>[qw(crypt md5)], + default=>'crypt', + }, +; + +1; + diff --git a/FS/MANIFEST b/FS/MANIFEST index b12fdc4ca..10a64d070 100644 --- a/FS/MANIFEST +++ b/FS/MANIFEST @@ -173,6 +173,7 @@ t/part_export-http.t t/part_export-infostreet.t t/part_export-ldap.t t/part_export-null.t +t/part_export-passwdfile.t t/part_export-postfix.t t/part_export-router.t t/part_export-shellcommands.t diff --git a/FS/t/part_export-passwdfile.t b/FS/t/part_export-passwdfile.t new file mode 100644 index 000000000..0f18f3044 --- /dev/null +++ b/FS/t/part_export-passwdfile.t @@ -0,0 +1,5 @@ +BEGIN { $| = 1; print "1..1\n" } +END {print "not ok 1\n" unless $loaded;} +use FS::part_export::passwdfile; +$loaded=1; +print "ok 1\n"; -- 2.11.0