Index: src/groffstudio.lpi ================================================================== --- src/groffstudio.lpi +++ src/groffstudio.lpi @@ -21,11 +21,11 @@ - + Index: src/unit1.pas ================================================================== --- src/unit1.pas +++ src/unit1.pas @@ -134,12 +134,11 @@ {$R *.lfm} procedure TDetectGroffThread.UpdateUI; begin - // groff: - MainForm.edtGroffInstalledVersion.Text := GroffOutputVersion; + // Try to find groff: if pos('GNU', GroffOutputVersion) = 0 then begin ShowMessage('groffstudio thinks that your installed version of troff is not GNU troff.' + LineEnding + 'If this is correct, you are advised to fix this before continuing.' + LineEnding + @@ -147,14 +146,17 @@ hasGroff := False; MainForm.edtGroffInstalledVersion.Text := 'n/a'; MainForm.lblTroffCommandNotFound.Visible := True; end else + begin hasGroff := True; + MainForm.edtGroffInstalledVersion.Text := GroffOutputVersion; + end; - // ps2pdf (Windows-only): {$IFDEF WINDOWS} + // Try to find ps2pdf (Windows-only): if pos('ps2pdf', ps2pdfOutput) = 0 then begin ShowMessage('On Windows, for creating PDF files, you need Ghostscript installed.' + LineEnding + 'Sadly, groffstudio could not find ps2pdf.exe in your %PATH%, so ' + 'writing PDF files will not be supported.');