diff --git a/lcl/interfaces/gtk2/gtk2themes.pas b/lcl/interfaces/gtk2/gtk2themes.pas
index cd17fb88ef..e7de7b3dfc 100644
--- a/lcl/interfaces/gtk2/gtk2themes.pas
+++ b/lcl/interfaces/gtk2/gtk2themes.pas
@@ -360,7 +360,7 @@ begin
                   Result.Shadow := GTK_SHADOW_IN
                 else
                 if Details.State in [TS_HOT] then
-                  Result.Shadow := GTK_SHADOW_ETCHED_IN
+                  Result.Shadow := GTK_SHADOW_ETCHED_OUT
                 else
                   Result.Shadow := GTK_SHADOW_NONE;