소스 검색

PIP-0027: fix error message bug in EPASA parsing

Herman Schoenfeld 4 년 전
부모
커밋
eefbf336c3
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  1. 1 1
      src/core/UNode.pas

+ 1 - 1
src/core/UNode.pas

@@ -927,7 +927,7 @@ begin
     AResolvedAccount := CT_AccountNo_NUL;
     AResolvedKey := CT_Account_NUL.accountInfo.accountKey;
     ARequiresPurchase := False;
-    AErrorMessage := Format('Account number %d does not exist in safebox',[AResolvedAccount]);
+    AErrorMessage := Format('Account number %d does not exist in safebox',[AEPasa.Account.Value]);
     Exit(False);
   end;
   Result := true;