ChangeLogTag: Mon Mar 6 18:09:36 UTC 2006 Chad Elliott <elliott_c@ociweb.com>

1 files changed, 6 insertions, 5 deletions

diff --git a/modules/WinProjectBase.pm b/modules/WinProjectBase.pm
index 4ff55777..24c33707 100644
--- a/modules/WinProjectBase.pm
+++ b/modules/WinProjectBase.pm
@@ -42,8 +42,9 @@ sub translate_directory {
   $dir = $self->DirectoryManager::translate_directory($dir);
 
   ## Remove the current working directory from $dir (if it is contained)
-  my($cwd)  = $self->slash_to_backslash($self->getcwd());
+  my($cwd)  = $self->getcwd();
   my($cwdl) = length($cwd);
+  $cwd =~ s/\//\\/g;
   if (index($dir, $cwd) == 0) {
     $dir = substr($dir, $cwdl + 1);
   }
@@ -99,10 +100,10 @@ sub crlf {
 
 
 sub file_sorter {
-  my($self)  = shift;
-  my($left)  = shift;
-  my($right) = shift;
-  return lc($left) cmp lc($right);
+  #my($self)  = shift;
+  #my($left)  = shift;
+  #my($right) = shift;
+  return lc($_[1]) cmp lc($_[2]);
 }