* dispinterfaces are publishable as well

git-svn-id: trunk@5773 -
This commit is contained in:
florian 2007-01-01 18:30:53 +00:00
parent 1914a723c0
commit 2049837dd9

View File

@ -4029,7 +4029,7 @@ implementation
function tobjectdef.is_publishable : boolean;
begin
is_publishable:=objecttype in [odt_class,odt_interfacecom,odt_interfacecorba];
is_publishable:=objecttype in [odt_class,odt_interfacecom,odt_interfacecorba,odt_dispinterface];
end;