Prechádzať zdrojové kódy

FIX: ExcludeBackPathDelimiter with drive root

Alexander Koblov 3 rokov pred
rodič
commit
ff2732ac56
1 zmenil súbory, kde vykonal 1 pridanie a 1 odobranie
  1. 1 1
      components/doublecmd/dcstrutils.pas

+ 1 - 1
components/doublecmd/dcstrutils.pas

@@ -773,7 +773,7 @@ var
   L: Integer;
 begin
   L:= Length(Path);
-  if (L > 1) and (Path[L] in AllowDirectorySeparators) then
+  if (L > 1) and (Path[L] in AllowDirectorySeparators) and (Path[L - 1] <> DriveSeparator) then
     Result:= Copy(Path, 1, L - 1)
   else
     Result:= Path;