diff options
| author | elliott_c <ocielliottc@users.noreply.github.com> | 2006-03-23 14:32:33 +0000 |
|---|---|---|
| committer | elliott_c <ocielliottc@users.noreply.github.com> | 2006-03-23 14:32:33 +0000 |
| commit | db096cc0a0a62f19bc4d1b0f8aad17ba5101259c (patch) | |
| tree | 25c6603cedc4843ed69c8d27dc007cd8222c8fda /modules/Driver.pm | |
| parent | 0e9499dd7e4ef15e9436c27bb60667f03dd7e055 (diff) | |
| download | MPC-db096cc0a0a62f19bc4d1b0f8aad17ba5101259c.tar.gz | |
ChangeLogTag: Thu Mar 23 14:30:00 UTC 2006 Chad Elliott <elliott_c@ociweb.com>
Diffstat (limited to 'modules/Driver.pm')
| -rw-r--r-- | modules/Driver.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/modules/Driver.pm b/modules/Driver.pm index e6d57ee3..bf59c39e 100644 --- a/modules/Driver.pm +++ b/modules/Driver.pm @@ -287,6 +287,8 @@ sub run { foreach my $cfile (@{$options->{'input'}}) { ## To correctly reference any pathnames in the input file, chdir to ## its directory if there's any directory component to the specified path. + ## mpc_basename() always expects UNIX file format. + $cfile =~ s/\\/\//g; my($base) = ($cfile eq '' ? '' : $self->mpc_basename($cfile)); if (-d $cfile) { |