From fdd47f0673c7239beeab91f8ae1356e4bb79f94b Mon Sep 17 00:00:00 2001
From: paul <paul@lazarus-ide.org>
Date: Fri, 5 Jun 2009 03:12:54 +0000
Subject: [PATCH] gtk: fill modifiers for 2 mouse extra butttons

git-svn-id: trunk@20419 -
---
 lcl/interfaces/gtk/gtkproc.pp | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lcl/interfaces/gtk/gtkproc.pp b/lcl/interfaces/gtk/gtkproc.pp
index 6b267e0896..319fd60d81 100644
--- a/lcl/interfaces/gtk/gtkproc.pp
+++ b/lcl/interfaces/gtk/gtkproc.pp
@@ -924,6 +924,8 @@ begin
   MModifiers[ssLeft].Mask     := GDK_BUTTON1_MASK;
   MModifiers[ssMiddle].Mask   := GDK_BUTTON2_MASK;
   MModifiers[ssRight].Mask    := GDK_BUTTON3_MASK;
+  MModifiers[ssExtra1].Mask   := GDK_BUTTON4_MASK;
+  MModifiers[ssExtra2].Mask   := GDK_BUTTON5_MASK;
 
   FillChar(MKeyCodeInfo, SizeOf(MKeyCodeInfo), $FF);
   FillChar(MVKeyInfo, SizeOf(MVKeyInfo), 0);