paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-08 04:02:18 +01:00
Code Issues Packages Projects Releases Wiki Activity

* fixed class conversion and inheritance tree errors

Browse Source 
git-svn-id: trunk@6871 -
This commit is contained in:
Jonas Maebe 2007-03-15 09:48:21 +00:00
parent 5a6eabcd6c
commit 4e5488529d
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/fcl-net/src/mkxmlrpc.pp
View File

@ -308,7 +308,7 @@ type
Result := Result + ')'; Result := Result + ')';
end; end;
function GetParseValueFnName(PasType: TPasType): String; function GetParseValueFnName(PasType: TPasElement): String;
var var
s: String; s: String;
begin begin

6
packages/fcl-xml/src/xhtml.pp
View File

@ -26,9 +26,9 @@ uses DOM, DOM_HTML;
type type
TXHTMLTitleElement = class(TDOMElement); TXHTMLTitleElement = class(THTMLTitleElement);
TXHTMLHeadElement = class(TDOMElement) TXHTMLHeadElement = class(THTMLHeadElement)
private private
function GetTitleElement: TXHTMLTitleElement; function GetTitleElement: TXHTMLTitleElement;
public public
@ -36,7 +36,7 @@ type
property TitleElement: TXHTMLTitleElement read GetTitleElement; property TitleElement: TXHTMLTitleElement read GetTitleElement;
end; end;
TXHTMLBodyElement = class(TDOMElement); TXHTMLBodyElement = class(THTMLBodyElement);
TXHTMLType = (xhtmlStrict, xhtmlTransitional); TXHTMLType = (xhtmlStrict, xhtmlTransitional);