Procházet zdrojové kódy

* Fix to allow / instead of " fexpand.inc

git-svn-id: trunk@2746 -
Tomas Hajny před 19 roky
rodič
revize
ccbc7717cc
1 změnil soubory, kde provedl 1 přidání a 1 odebrání
  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