Репозитории ALT
S: | 3.2.2-alt4 |
D: | 2.2.2-alt1 |
5.1: | 2.2.4-alt4.M50P.1 |
4.1: | 2.2.0-alt3 |
4.0: | 2.2.0-alt2 |
3.0: | 1.0.10-alt1 |
Группа :: Разработка/Прочее
Пакет: fpc
Главная Изменения Спек Патчи Sources Загрузить Gear Bugs and FR Repocop
Патч: fpc-writeidx-show-progress.patch
Скачать
Скачать
diff --git a/fpcbuild/fpcsrc/installer/writeidx.pas b/fpcbuild/fpcsrc/installer/writeidx.pas
index 63434eb..cd565f3 100644
--- a/fpcbuild/fpcsrc/installer/writeidx.pas
+++ b/fpcbuild/fpcsrc/installer/writeidx.pas
@@ -32,6 +32,7 @@
procedure TFPHTMLFileLinkScanner.ProcessDoc(Doc: PHTMLLinkScanFile);
begin
+ Writeln('Processing '+Doc^.GetDocumentURL);
end;