Changeset dcc0498f in tol

Timestamp:

Jun 24, 2010, 1:36:48 PM (16 years ago)

Author:

Víctor de Buen <vdebuen@…>

Branches:

1941-docker-image-to-test, devel, master

Children:

a110589

Parents:

c543d5e

Message:

Refs #921

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@2306 be4846ae-f051-483a-831f-b64e7d08527f

File:

• tol/bbasic/dir.cpp (modified) (2 diffs)

tol/bbasic/dir.cpp

@@ -451 +451 @@
 //--------------------------------------------------------------------
 {
-  if(!path_.HasName()) { return(path_); }
+//if(!path_.HasName()) { return(path_); }
   /*
 #if defined(UNIX)
@@ -463 +463 @@
   BText path = GetAbsolutePath(path_);
 #ifdef WIN32
-  static int maxPathLength_ = 2048;
-  static char* fName = new char[maxPathLength_];
-  int  len = GetLongPathName(path.String(), fName, maxPathLength_-1);
-  return(BText(fName,len));
+  #define maxPathLength_ 10000
+  static char fName[maxPathLength_];
+  TCHAR** lppPart={NULL};
+  int  len = GetFullPathName(path.String(), maxPathLength_-1, fName, lppPart);
+  path.Copy(fName,len);
+  path.Replace("\\","/");
+  return(path);
 #else
   return path;