소스 검색

* Patch from Joost van der Sluis to fix obvious crash

git-svn-id: trunk@6854 -
michael 18 년 전
부모
커밋
2948802fb7
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  1. 1 1
      packages/fcl-web/src/fptemplate.pp

+ 1 - 1
packages/fcl-web/src/fptemplate.pp

@@ -433,7 +433,7 @@ begin
     Try
       P:=CreateParser;
       Try
-        If (F=Nil) then
+        If (F<>Nil) then
           begin
           P.ParseStream(F,S);
           Result:=S.DataString;