فهرست منبع

* fix for doubled slashes in paths by Giulio Bernardi

git-svn-id: trunk@10796 -
Tomas Hajny 17 سال پیش
والد
کامیت
e64c9a152a
1فایلهای تغییر یافته به همراه2 افزوده شده و 2 حذف شده
  1. 2 2
      compiler/options.pas

+ 2 - 2
compiler/options.pas

@@ -2401,8 +2401,8 @@ begin
   if fpcdir='' then
     begin
       fpcdir:=ExePath+'../';
-      if not(PathExists(fpcdir+'/units',true)) and
-         not(PathExists(fpcdir+'/rtl',true)) then
+      if not(PathExists(fpcdir+'units',true)) and
+         not(PathExists(fpcdir+'rtl',true)) then
         fpcdir:=fpcdir+'../';
     end;
 {$endif unix}