ui.backend.cocoa.views: Don't throw an error on weird mouse buttons. F…

…ixes factor#1453.
slavapestov · Aug 19, 2015 · 3649dd2 · 3649dd2
1 parent ac5da31
commit 3649dd2
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/basis/ui/backend/cocoa/views/views.factor b/basis/ui/backend/cocoa/views/views.factor
@@ -14,12 +14,14 @@ IN: ui.backend.cocoa.views
     [ mouse-location ] [ drop window ] 2bi
     [ move-hand fire-motion yield ] [ drop ] if* ;
 
+! Issue #1453
 : button ( event -- n )
     #! Cocoa -> Factor UI button mapping
     -> buttonNumber {
         { 0 [ 1 ] }
         { 1 [ 3 ] }
         { 2 [ 2 ] }
+        [ ]
     } case ;
 
 CONSTANT: modifiers