Update of /cvsroot/mahogany/M/src/gui
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv2864/src/gui

Modified Files:
        wxComposeView.cpp 
Log Message:
corrected Shift-Tab and Tab behaviour with wx 2.5.2

Index: wxComposeView.cpp
===================================================================
RCS file: /cvsroot/mahogany/M/src/gui/wxComposeView.cpp,v
retrieving revision 1.364
retrieving revision 1.365
diff -b -u -2 -r1.364 -r1.365
--- wxComposeView.cpp   2 Jul 2004 21:37:11 -0000       1.364
+++ wxComposeView.cpp   9 Jul 2004 10:50:34 -0000       1.365
@@ -1236,6 +1236,12 @@
    if ( event.GetKeyCode() == WXK_TAB )
    {
-      if ( IsModified() &&
-           !event.ControlDown() && !event.ShiftDown() && !event.AltDown() )
+      if ( event.ShiftDown() )
+      {
+#if wxCHECK_VERSION(2, 5, 2)
+         Navigate(0);
+#endif // wx 2.5.2+
+      }
+      else if ( IsModified() &&
+                  !event.ControlDown() && !event.AltDown() )
       {
          // mark control as being "not modified" - if the user presses TAB
@@ -1256,8 +1262,19 @@
             return;
          }
-         //else: text is empty, treat the TAB normally
+#if wxCHECK_VERSION(2, 5, 2)
+         else
+         {
+            // text is empty, treat the TAB normally
+            Navigate();
       }
-      //else: nothing because we're not interested in Ctrl-TAB, Shift-TAB &c -
+#endif // wx 2.5.2+
+      }
+      //else: nothing because we're not interested in Ctrl-TAB, Alt-TAB &c -
       //      and also in the TABs if the last one was already a TAB
+
+#if wxCHECK_VERSION(2, 5, 2)
+      // skip Skip() below, otherwise a TAB would be inserted in the control
+      return;
+#endif // wx 2.5.2+
    }
 



-------------------------------------------------------
This SF.Net email sponsored by Black Hat Briefings & Training.
Attend Black Hat Briefings & Training, Las Vegas July 24-29 - 
digital self defense, top technical experts, no vendor pitches, 
unmatched networking opportunities. Visit www.blackhat.com
_______________________________________________
Mahogany-cvsupdates mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/mahogany-cvsupdates

Reply via email to