From 487ecf63e6deeb88108451354ba301f0b675a7b8 Mon Sep 17 00:00:00 2001 From: Andrea Magni Date: Wed, 9 Nov 2016 11:11:57 +0100 Subject: [PATCH 1/2] * removed unused variables --- source/RlxRazor.pas | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/source/RlxRazor.pas b/source/RlxRazor.pas index c8b57a6..aa85afc 100644 --- a/source/RlxRazor.pas +++ b/source/RlxRazor.pas @@ -1543,12 +1543,11 @@ function TRlxRazorEngine.ProcessRequest(Request: TWebRequest; var pathInfo: string; razorProc: TRlxRazorProcessor; - sList, sInFolderList, sBasePathList: TStringList; + sList: TStringList; ext: string; pageInfo: TPageInfo; FilePath, subFolder, strAlias: string; execData: TRazorExecData; - LIndex: Integer; begin pathInfo := Trim(string(Request.InternalPathInfo)); // normalize path, remove initial / From de46a63c4827cb1ac04c1c108dcda3de8d9fbfd9 Mon Sep 17 00:00:00 2001 From: Andrea Magni Date: Wed, 28 Jun 2017 06:42:24 +0200 Subject: [PATCH 2/2] * support for dotted unit names in scaffolding --- source/RlxRazor.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/source/RlxRazor.pas b/source/RlxRazor.pas index 0ea1215..bde6c60 100644 --- a/source/RlxRazor.pas +++ b/source/RlxRazor.pas @@ -711,7 +711,7 @@ function TRlxRazorProcessor.GetEntireDottedValue (Parser: TCopyParser; Encoding: Result := Encoding.GetString(BytesOf(Parser.TokenString)); Parser.SkipToken(True); // if followed by ., read the next element - if Parser.Token = '.' then + while Parser.Token = '.' do begin Parser.SkipToken(True); TokenAfterDot := Encoding.GetString(BytesOf(Parser.TokenString));