X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FSQL%2FTranslator%2FProducer%2FDiaUml.pm;h=7c02d33a20f994fb0920c5631e7908a80686e072;hb=44659089c28216f1984873bc4aa8641e2e0e3410;hp=569ad47438229ece5f4d1086f713e8e9c18db7fd;hpb=478f608d9028508396da37bb5df10b3057b96981;p=dbsrgits%2FSQL-Translator.git diff --git a/lib/SQL/Translator/Producer/DiaUml.pm b/lib/SQL/Translator/Producer/DiaUml.pm index 569ad47..7c02d33 100644 --- a/lib/SQL/Translator/Producer/DiaUml.pm +++ b/lib/SQL/Translator/Producer/DiaUml.pm @@ -1,8 +1,6 @@ package SQL::Translator::Producer::DiaUml; # ------------------------------------------------------------------- -# $Id$ -# ------------------------------------------------------------------- # Copyright (C) 2002-2009 SQLFairy Authors # # This program is free software; you can redistribute it and/or @@ -58,20 +56,19 @@ automatically arrange them horizontally or vertically. use strict; -use vars qw[ $DEBUG @EXPORT_OK ]; +use vars qw[ $DEBUG $VERSION @EXPORT_OK ]; +$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' }