pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

Fix schema "import" generation.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2986 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
inoussa
2014-05-02 01:49:33 +00:00
parent cb00cea75a
commit 0bff229235
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
wst/trunk/ws_helper/wsdl_generator.pas
View File

@@ -168,8 +168,8 @@ begin
end;
g := TWsdlTypechemaGenerator.Create(Document) as IGenerator;
for i := 0 to Pred(mdlLs.Count) do begin
mdl := TPasModule(mdlLs[i]);
if (mdl <> AModule) then begin
mdl := TPasModule(mdlLs[i]);
if mdl.InheritsFrom(TPasNativeModule) then
Continue;
s := ASymTable.GetExternalName(mdl);