summaryrefslogtreecommitdiff
path: root/UError.pas
diff options
context:
space:
mode:
Diffstat (limited to 'UError.pas')
-rw-r--r--UError.pas8
1 files changed, 4 insertions, 4 deletions
diff --git a/UError.pas b/UError.pas
index 3863575..b079007 100644
--- a/UError.pas
+++ b/UError.pas
@@ -21,7 +21,7 @@ unit UError;
interface
-uses lazglib2, gtk2, Classes, SysUtils, GTKForms;
+uses lazglib2, lazgtk3, Classes, SysUtils, GTKForms;
type TuxcmdErrorEnum = (
TUXCMD_ERROR_CANCELLED,
@@ -127,7 +127,7 @@ procedure VFSToTuxcmdError(Error: PPGError; Operation: TuxcmdErrorEnum);
implementation
-uses UCoreUtils, UGnome;
+uses UCoreUtils;
(********************************************************************************************************************************)
@@ -213,10 +213,10 @@ var Dialog: PGtkWidget;
begin
if Error <> nil then error_str := Error^.message
else error_str := '';
- dialog := gtk_message_dialog_new_with_markup(PGtkWindow(Parent.FWidget), GTK_DIALOG_MODAL or GTK_DIALOG_DESTROY_WITH_PARENT,
+ dialog := gtk_message_dialog_new_with_markup(PGtkWindow(Parent.FWidget), [GTK_DIALOG_MODAL, GTK_DIALOG_DESTROY_WITH_PARENT],
GTK_MESSAGE_ERROR, GTK_BUTTONS_OK,
'<span size="large" weight="ultrabold">%s</span>'#10#10'%s',
- PChar(Text), error_str);
+ [PChar(Text), error_str]);
gtk_window_set_title(PGtkWindow(dialog), '');
gtk_dialog_run(PGtkDialog(Dialog));
gtk_widget_destroy(PGtkWidget(Dialog));