paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-29 20:50:18 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: auto create fpdoc directory: use relative lazdoc path

Browse Source 
git-svn-id: trunk@22153 -
This commit is contained in:
mattias 2009-10-13 21:04:56 +00:00
parent 329861f95c
commit 32306cd763
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/codehelp.pas
View File

@ -895,6 +895,8 @@ function TCodeHelpManager.DoCreateFPDocFileForSource(const SrcFilename: string;
function SelectNewLazDocPaths(const Title, BaseDir: string): string;
begin
Result:=LazSelectDirectory('Choose LazDoc directory for '+Title,BaseDir);
if (Result<>'') then
Result:=CreateRelativePath(Result,BaseDir);
end;
var