@@ -19,16 +19,16 @@ interface uses Classes, SysUtils, Forms, Controls, Graphics, Dialogs, ComCtrls, StdCtrls, - ExtCtrls, Buttons, ExtendedNotebook, SynEdit, fphttpclient, opensslsockets, + ExtCtrls, Buttons, ExtendedNotebook, SynEdit, fphttpclient, RegExpr, LCLIntf, LCLType, IniPropStorage, Process, Helpers, fileinfo, {$IF DEFINED(WINDOWS)} - winpeimagereader, + winpeimagereader, opensslsockets, {$ELSEIF DEFINED(DARWIN)} - machoreader, ssockets, sslsockets, sslbase, + machoreader, ssockets, sslsockets, sslbase, opensslsockets, {$ELSEIF DEFINED(LINUX)} elfreader, {$ENDIF} BuildOutputWindow; @@ -171,12 +171,18 @@ // Restore the settings iniStorage.Restore; storeBuildSettings := iniStorage.ReadBoolean('AutoSaveBuildSettings', False); chkAutoSaveBuildSettings.Checked := storeBuildSettings; +{$IF DEFINED(LINUX) OR DEFINED(BSD)} + // On platforms which probably use a package manager (currently, Linux and + // BSDs), the "update check" checkbox is disabled. + chkUpdateCheckOnStart.Enabled := False; +{$ELSE} updateCheck := iniStorage.ReadBoolean('UpdateCheckOnStart', False); chkUpdateCheckOnStart.Checked := updateCheck; +{$ENDIF} if storeBuildSettings then begin chkLogFile.Checked := iniStorage.ReadBoolean('BuildLogFile', False); cmbMacro.Text := iniStorage.ReadString('BuildChosenMacro', '[ select ]'); @@ -308,10 +314,11 @@ end; procedure TMainForm.btnDownloadGroffWindowsClick(Sender: TObject); begin {$IFDEF WINDOWS} + // On other systems, the button is disabled anyway. OpenURL(latestGroffWindowsUrl); {$ENDIF} end; procedure TMainForm.btnBuildClick(Sender: TObject); @@ -452,11 +459,11 @@ // If the current file has unsaved changes, ask first. if unsavedChanges then with Application do begin BoxStyle := MB_ICONQUESTION + MB_YESNO; Reply := MessageBox('Do you want to save the document first?', 'UnsavedChanges', BoxStyle); - if Reply = IDYES then SynEdit1.Lines.SaveToFile(currentGroffFilePath); + if Reply = IDYES then btnSaveGroffClick(Sender); end; end; {$IFDEF DARWIN} // Fix HTTPS on macOS: