diff options
Diffstat (limited to 'Master/tlpkg/tlperl/lib/File/HomeDir/Driver.pm')
-rwxr-xr-x | Master/tlpkg/tlperl/lib/File/HomeDir/Driver.pm | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/Master/tlpkg/tlperl/lib/File/HomeDir/Driver.pm b/Master/tlpkg/tlperl/lib/File/HomeDir/Driver.pm new file mode 100755 index 00000000000..c47a7caaad1 --- /dev/null +++ b/Master/tlpkg/tlperl/lib/File/HomeDir/Driver.pm @@ -0,0 +1,19 @@ +package File::HomeDir::Driver; + +# Abstract base class that provides no functionality, +# but confirms the class is a File::HomeDir driver class. + +use 5.00503; +use strict; +use Carp (); + +use vars qw{$VERSION}; +BEGIN { + $VERSION = '0.89'; +} + +sub my_home { + Carp::croak("$_[0] does not implement compulsory method $_[1]"); +} + +1; |