소스 검색

# revisions: 45399

git-svn-id: tags/release_3_2_0@45400 -
marco 5 년 전
부모
커밋
a943608b65
1개의 변경된 파일5개의 추가작업 그리고 0개의 파일을 삭제
  1. 5 0
      utils/fpdoc/dw_htmlchm.inc

+ 5 - 0
utils/fpdoc/dw_htmlchm.inc

@@ -598,6 +598,11 @@ begin
     begin  //split into filename and prefix
     ALinkPrefix := Copy(AFilename,i+1,Length(AFilename));
     SetLength(AFilename, i-1);
+    if copy(ALinkPrefix,1,2)='..' then // workaround for project files.
+      begin
+        ALinkPrefix := 'ms-its:' + ChangeFileExt(ExtractFileName(AFilename), '.chm') + '::/';
+        AFilename := ChangeFileExt(AFilename, '.xct');
+      end;
     end
   else if ALinkPrefix = '' then
     begin  //synthesize outdir\pgk.xct, ms-its:pkg.chm::/