mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-17 04:29:28 +02:00
fixed chm options if FPCDocDir is not set
git-svn-id: trunk@13408 -
This commit is contained in:
parent
e5e017a04d
commit
e7071a7b67
@ -129,9 +129,6 @@ begin
|
|||||||
begin
|
begin
|
||||||
SetString(RTLPrefix, 'ms-its:rtl.chm::/', 'RTLLINKPREFIX');
|
SetString(RTLPrefix, 'ms-its:rtl.chm::/', 'RTLLINKPREFIX');
|
||||||
SetString(FCLPrefix, 'ms-its:fcl.chm::/', 'FCLLINKPREFIX');
|
SetString(FCLPrefix, 'ms-its:fcl.chm::/', 'FCLLINKPREFIX');
|
||||||
ArgParams:=ArgParams+' --output='+ ChangeFileExt(PackageName, '.chm')
|
|
||||||
+' --auto-toc --auto-index'
|
|
||||||
+' --css-file=..'+PathDelim+'fpdoc.css ';
|
|
||||||
end
|
end
|
||||||
else
|
else
|
||||||
begin
|
begin
|
||||||
@ -146,6 +143,13 @@ begin
|
|||||||
FCLPrefix := ','+FCLPrefix;
|
FCLPrefix := ','+FCLPrefix;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
if OutFormat='chm' then
|
||||||
|
begin
|
||||||
|
ArgParams:=ArgParams+' --output='+ ChangeFileExt(PackageName, '.chm')
|
||||||
|
+' --auto-toc --auto-index'
|
||||||
|
+' --css-file=..'+PathDelim+'fpdoc.css ';
|
||||||
|
end;
|
||||||
|
|
||||||
ArgParams:=ArgParams+' --format='+OutFormat+' ';
|
ArgParams:=ArgParams+' --format='+OutFormat+' ';
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user