Add "Cycle Through Windows" to Windows menu (remove <D-`> hack)

This commit is contained in:
Bjorn Winckler
2008-06-04 18:45:45 +02:00
parent fa15736b2b
commit c2f8b396de
4 changed files with 8 additions and 16 deletions
+4
View File
@@ -2,6 +2,10 @@
<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
<dict>
<key>_cycleWindows:</key>
<string></string>
<key>_cycleWindowsBackwards:</key>
<string></string>
<key>addNewTab:</key>
<string></string>
<key>arrangeInFront:</key>
-8
View File
@@ -416,14 +416,6 @@ enum {
if ([[NSApp mainMenu] performKeyEquivalent:event])
return YES;
// HACK! KeyCode 50 represent the key which switches between windows
// within an application (like Cmd+Tab is used to switch between
// applications). Return NO here, else the window switching does not work.
//
// Will this hack work for all languages / keyboard layouts?
if ([event keyCode] == 50)
return NO;
// HACK! On Leopard Ctrl-key events end up here instead of keyDown:.
if (flags & NSControlKeyMask) {
[self keyDown:event];
-8
View File
@@ -651,14 +651,6 @@ enum {
if ([[NSApp mainMenu] performKeyEquivalent:event])
return YES;
// HACK! KeyCode 50 represent the key which switches between windows
// within an application (like Cmd+Tab is used to switch between
// applications). Return NO here, else the window switching does not work.
//
// Will this hack work for all languages / keyboard layouts?
if ([event keyCode] == 50)
return NO;
// HACK! On Leopard Ctrl-key events end up here instead of keyDown:.
if (flags & NSControlKeyMask) {
[self keyDown:event];
+4
View File
@@ -81,6 +81,8 @@ aunmenu Window
an <silent> 9900.300 Window.Minimize <Nop>
an <silent> 9900.310 Window.Zoom <Nop>
an <silent> 9900.320 Window.Toggle\ Full\ Screen\ Mode :set invfullscreen<CR>
an <silent> 9900.325 Window.Cycle\ Through\ Windows <Nop>
an <silent> 9900.326 Window.Cycle\ Through\ Windows\ Backwards <Nop>
an 9900.330 Window.-SEP1- <Nop>
" TODO! Grey out if no tabs are visible.
an <silent> 9900.340 Window.Previous\ Tab :tabprevious<CR>
@@ -238,6 +240,8 @@ macm Tools.Newer\ List key=<D-C-Down>
macm Window.Minimize key=<D-m> action=performMiniaturize:
macm Window.Zoom key=<D-C-z> action=performZoom:
macm Window.Toggle\ Full\ Screen\ Mode key=<D-F>
macm Window.Cycle\ Through\ Windows key=<D-`> action=_cycleWindows:
macm Window.Cycle\ Through\ Windows\ Backwards key=<D-S-`> action=_cycleWindowsBackwards: alt=YES
macm Window.Previous\ Tab key=<D-{>
macm Window.Next\ Tab key=<D-}>
macm Window.Bring\ All\ To\ Front action=arrangeInFront: