فهرست منبع

* Fix to allow / instead of " fexpand.inc

git-svn-id: trunk@2746 -
Tomas Hajny 19 سال پیش
والد
کامیت
ccbc7717cc
1فایلهای تغییر یافته به همراه1 افزوده شده و 1 حذف شده
  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