Explorar o código

* Fix to allow / instead of " fexpand.inc

git-svn-id: trunk@2746 -
Tomas Hajny %!s(int64=19) %!d(string=hai) anos
pai
achega
ccbc7717cc
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      rtl/inc/fexpand.inc

+ 1 - 1
rtl/inc/fexpand.inc

@@ -133,7 +133,7 @@ begin
             Pa [I] := DirectorySeparator
       end
     else
-      if DirectorySeparator = '\' then
+      if DirectorySeparator = '/' then
     {Allow backslash as slash}
         begin
           for I := 1 to Length (Pa) do