diff -r b788617a584a -r 7b6dfbac0dd3 sysmodelgen/src/old/svg/DrawSvg.pm --- a/sysmodelgen/src/old/svg/DrawSvg.pm Thu Jun 10 15:00:37 2010 +0100 +++ b/sysmodelgen/src/old/svg/DrawSvg.pm Thu Jun 10 16:30:35 2010 +0100 @@ -806,8 +806,8 @@ # Step 1: # Create a Model.xml based on the ModelTemplate.xml - open (INPUT, $modelTemplateXml) or &Logger::LogError("Xalan error ($error) occured in Step 1 of SVG building...", KOldSystemModelGenerator, 1); - open (OUTPUT, ">$modelXml") or &Logger::LogError("Xalan error ($error) occured in Step 1 of SVG building...", KOldSystemModelGenerator, 1); + open (INPUT, $modelTemplateXml) or &Logger::LogError("Xalan error ($?) occured in Step 1 of SVG building (<$modelTemplateXml)...", KOldSystemModelGenerator, 1); + open (OUTPUT, ">$modelXml") or &Logger::LogError("Xalan error ($?) occured in Step 1 of SVG building (>$modelXml)...", KOldSystemModelGenerator, 1); my $release = $self->{iRelease}; @@ -957,8 +957,8 @@ { my $self = shift; my $xsltDir = $FindBin::Bin."/svg"; # calcluated w.r.t old directory + $xsltDir = $FindBin::Bin."/src/old/svg" if ! -d $xsltDir; # calculated w.r.t the root directory $xsltDir = $FindBin::Bin if ! -d $xsltDir; # calculated w.r.t the /svg directory - $xsltDir = $FindBin::Bin."/src/old/svg" if ! -d $xsltDir; # calculated w.r.t the root directory return $xsltDir; }