X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FSQL%2FTranslator%2FProducer%2FDiaUml.pm;h=7c02d33a20f994fb0920c5631e7908a80686e072;hb=9190556bfd4424ae3cc15c7b3085045b43d7c110;hp=7e1f543054a12312bb8d8f05d6e01981af5a8626;hpb=b03926cdac036bdbcf69e478ca29e1121c814646;p=dbsrgits%2FSQL-Translator.git diff --git a/lib/SQL/Translator/Producer/DiaUml.pm b/lib/SQL/Translator/Producer/DiaUml.pm index 7e1f543..7c02d33 100644 --- a/lib/SQL/Translator/Producer/DiaUml.pm +++ b/lib/SQL/Translator/Producer/DiaUml.pm @@ -57,20 +57,18 @@ automatically arrange them horizontally or vertically. use strict; use vars qw[ $DEBUG $VERSION @EXPORT_OK ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 0 unless defined $DEBUG; +use File::ShareDir qw/dist_dir/; + use SQL::Translator::Utils 'debug'; use base qw/SQL::Translator::Producer::TT::Base/; # Convert produce call into a method call on our class sub produce { return __PACKAGE__->new( translator => shift )->run; }; -# Uses dir in lib with this mods name as the template dir -my $_TEMPLATE_DIR = __FILE__; -$_TEMPLATE_DIR =~ s/\.pm$//; - sub tt_config { - ( INCLUDE_PATH => $_TEMPLATE_DIR ); + ( INCLUDE_PATH => File::Spec->catdir (dist_dir('SQL-Translator'), 'DiaUml') ); } sub tt_schema { 'schema.tt2' }