paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-22 14:40:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

Gtk2: TGtk2WidgetSet.PromptUser() fixed wrong mapping of ignore button to gtk-remove stock id. Now it's mapped to gtk-cancel since gtk2 doesn't have "ignore" as stock id. Fixes #17812.

Browse Source 
git-svn-id: trunk@28058 -
This commit is contained in:
zeljko 2010-11-03 14:53:49 +00:00
parent 6f951c6cc6
commit e7da031bee
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lcl/interfaces/gtk2/gtk2lclintf.inc
View File

@ -1,4 +1,4 @@
{%MainUnit gtk2int.pp}
{%MainUnit gtk2int.pas}
{ $Id$ }
{******************************************************************************
All GTK2 interface communication implementations.
@ -906,7 +906,7 @@ var
idButtonClose : Result := GTK_RESPONSE_CLOSE;
idButtonAbort : Result := GTK_RESPONSE_CANCEL;
idButtonRetry : Result := GTK_RESPONSE_ACCEPT;
idButtonIgnore : Result := GTK_RESPONSE_CLOSE;
idButtonIgnore : Result := GTK_RESPONSE_CANCEL;
idButtonNoToAll : Result := GTK_RESPONSE_APPLY;
idButtonYesToAll : Result := GTK_RESPONSE_REJECT;
end;
@ -954,7 +954,7 @@ begin
idButtonClose : CreateButton('gtk-close', GTK_RESPONSE_CLOSE);
idButtonAbort : CreateButton('gtk-stop', GTK_RESPONSE_REJECT);
idButtonRetry : CreateButton('gtk-refresh', GTK_RESPONSE_ACCEPT);
idButtonIgnore : CreateButton('gtk-remove', GTK_RESPONSE_CLOSE);
idButtonIgnore : CreateButton('gtk-cancel', GTK_RESPONSE_CLOSE);
idButtonNoToAll : CreateButton('gtk-no', GTK_RESPONSE_REJECT);
idButtonYesToAll : CreateButton('gtk-apply', GTK_RESPONSE_APPLY);
end;