diff options
author | elliott_c <ocielliottc@users.noreply.github.com> | 2004-08-11 12:47:34 +0000 |
---|---|---|
committer | elliott_c <ocielliottc@users.noreply.github.com> | 2004-08-11 12:47:34 +0000 |
commit | f1b109dab840cbccd5875f186890a056815e86fd (patch) | |
tree | 467f4b18373679f274ff5bf538f75ca15975d2da /modules/AutomakeProjectCreator.pm | |
parent | a622851adb21df46d3ea12adfe763b6a6462d84e (diff) | |
download | MPC-f1b109dab840cbccd5875f186890a056815e86fd.tar.gz |
ChangeLogTag: Wed Aug 11 07:45:11 2004 Chad Elliott <elliott_c@ociweb.com>
Diffstat (limited to 'modules/AutomakeProjectCreator.pm')
-rw-r--r-- | modules/AutomakeProjectCreator.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/modules/AutomakeProjectCreator.pm b/modules/AutomakeProjectCreator.pm index 20cc04f2..0be63e32 100644 --- a/modules/AutomakeProjectCreator.pm +++ b/modules/AutomakeProjectCreator.pm @@ -11,7 +11,6 @@ package AutomakeProjectCreator; # ************************************************************ use strict; -use File::Basename; use ProjectCreator; @@ -58,7 +57,7 @@ sub fill_value { my($comps) = $$names{$name}; foreach my $key (keys %$comps) { foreach my $item (@{$$comps{$key}}) { - my($dname) = $self->relative(dirname($item)); + my($dname) = $self->relative($self->mpc_dirname($item)); if ($dname ne '.' && $dname !~ /^\.\.\//) { $vpath{$dname} = 1; } |