From 4ae3c0b08bab4d3481a0be2c8b59e8c7edeaa325 Mon Sep 17 00:00:00 2001 From: silvioprog Date: Fri, 31 Jan 2014 02:28:29 -0300 Subject: [PATCH] Release 2.6.4. --- core/brookutils.pas | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/core/brookutils.pas b/core/brookutils.pas index 7784618..789f8b3 100644 --- a/core/brookutils.pas +++ b/core/brookutils.pas @@ -188,6 +188,7 @@ procedure BrookExtractPathLevels(S: string; var R: string; out ALvl: string; ALvl := Copy(S, 1, P - 1); R := IncludeHTTPPathDelimiter(R) + ALvl; end; + function BrookGetPathLevel(const APath: string; const AIndex: SizeInt; const ADelimiter: Char): string; var @@ -263,7 +264,7 @@ function BrookMatchMethod(const ABrookMethod: TBrookRequestMethod; procedure BrookDeleteFiles(APath: string; const ABeforeOf: TDateTime; const ASkippedFile: TFileName; const AContains: string); - function IsOldFile(const FN: TFileName; const DT: TDateTime): Boolean; + function IsOldFile(const FN: TFileName; const DT: TDateTime): Boolean; inline; begin if DT = NullDate then Result := True