From 2e457516301d364cc30ab78862cdff79da3d3c2d Mon Sep 17 00:00:00 2001
From: Bjorn Winckler <bjorn.winckler@gmail.com>
Date: Sat, 15 Aug 2009 02:49:17 +0200
Subject: [PATCH] Fix arrow and function key bug on Tiger

The bug caused arrow (and function) key presses to be sent twice.
---
 src/MacVim/MMTextViewHelper.m | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/MacVim/MMTextViewHelper.m b/src/MacVim/MMTextViewHelper.m
index 0f8a32398e..c13df9690f 100644
--- a/src/MacVim/MMTextViewHelper.m
+++ b/src/MacVim/MMTextViewHelper.m
@@ -294,7 +294,9 @@ KeyboardInputSourcesEqual(TISInputSourceRef a, TISInputSourceRef b)
 
     // HACK! Pass the event on or it may disappear (Tiger does not pass Cmd-key
     // events to keyDown:).
-    [self keyDown:event];
+    if ([event type] == NSKeyDown)
+        [self keyDown:event];
+
     return YES;
 }