将数字小键盘键与Emacs 24和OS / X绑定

时间:2011-04-21 05:33:48

标签: macos binding emacs emacs24

我正在尝试在OS / X上使用Git HEAD版本的Emacs 24,如本文所述:

http://www.viget.com/extend/emacs-24-rails-development-environment-from-scratch-to-productive-in-5-minu/

我想将一些Macintosh扩展键盘数字小键盘键绑定到Emacs功能,但它似乎不起作用。当我执行“c-h k”检查关键细节时,无法识别按键。同上,如果我在(global-set-key(kbd“kp-minus”)...)设置中引用它们。

这是使用Emacs 24的开发版本的问题还是关于Macintosh键盘硬件以及Emacs如何看待它的问题?任何人都可以提出最好的解决方法吗?

提前致谢,

斯图

4 个答案:

答案 0 :(得分:1)

我在构建emacs 24的键盘按键上遇到了同样的问题。问题与emacs 23相同。我修改了emacs 24代码如下以纠正问题。不确定这是一个很好的解决方案,但对我来说效果还不错。

index 91f0cbb..d537ee3 100644
--- a/src/nsterm.m
+++ b/src/nsterm.m
@@ -87,6 +87,7 @@ static unsigned convert_ns_to_X_keysym[] =
   NSBeginFunctionKey,           0x58,
   NSSelectFunctionKey,          0x60,
   NSPrintFunctionKey,           0x61,
+  NSClearLineFunctionKey,       0x0B,
   NSExecuteFunctionKey,         0x62,
   NSInsertFunctionKey,          0x63,
   NSUndoFunctionKey,            0x65,
@@ -134,6 +135,35 @@ static unsigned convert_ns_to_X_keysym[] =
   0x1B,                0x1B   /* escape */
 };

+static unsigned convert_nskeypad_to_X_keysym[] =
+{
+  /* Arrow keys are both function and keypad keys */
+  NSLeftArrowFunctionKey,       0x51,
+  NSUpArrowFunctionKey,         0x52,
+  NSRightArrowFunctionKey,      0x53,
+  NSDownArrowFunctionKey,       0x54,
+
+  0x41,                         0xAE,  /* KP_Decimal */
+  0x43,                         0xAA,  /* KP_Multiply */
+  0x45,                         0xAB,  /* KP_Add */
+  0x4B,                         0xAF,  /* KP_Divide */
+  0x4E,                         0xAD,  /* KP_Subtract */
+  0x51,                         0xBD,  /* KP_Equal */
+  0x52,                         0xB0,  /* KP_0 */
+  0x53,                         0xB1,  /* KP_1 */
+  0x54,                         0xB2,  /* KP_2 */
+  0x55,                         0xB3,  /* KP_3 */
+  0x56,                         0xB4,  /* KP_4 */
+  0x57,                         0xB5,  /* KP_5 */
+  0x58,                         0xB6,  /* KP_6 */
+  0x59,                         0xB7,  /* KP_7 */
+  0x5B,                         0xB8,  /* KP_8 */
+  0x5C,                         0xB9,  /* KP_9 */
+
+  // The enter key is on the keypad but modifier isnt set
+  NSEnterCharacter,        0x8D
+};
+

 static Lisp_Object Qmodifier_value;
 Lisp_Object Qalt, Qcontrol, Qhyper, Qmeta, Qsuper, Qnone;
@@ -1924,13 +1954,33 @@ ns_convert_key (unsigned code)
   unsigned keysym;
   /* An array would be faster, but less easy to read. */
   for (keysym = 0; keysym < last_keysym; keysym += 2)
-    if (code == convert_ns_to_X_keysym[keysym])
-      return 0xFF00 | convert_ns_to_X_keysym[keysym+1];
+      
+      if (code == convert_ns_to_X_keysym[keysym]) {
+        return 0xFF00 | convert_ns_to_X_keysym[keysym+1];
+      }
   return 0;
 /* if decide to use keyCode and Carbon table, use this line:
      return code > 0xff ? 0 : 0xFF00 | ns_keycode_to_xkeysym_table[code]; */
 }

+static unsigned
+ns_convert_keypad (unsigned code)
+/* --------------------------------------------------------------------------
+    Internal call used by NSView-keyDown.
+   -------------------------------------------------------------------------- */
+{
+  const unsigned last_keysym = (sizeof (convert_nskeypad_to_X_keysym)
+                                / sizeof (convert_nskeypad_to_X_keysym[0]));
+  unsigned keysym;
+  /* An array would be faster, but less easy to read. */
+  for (keysym = 0; keysym < last_keysym; keysym += 2) {
+      if (code == convert_nskeypad_to_X_keysym[keysym]) {
+        return 0xFF00 | convert_nskeypad_to_X_keysym[keysym+1];
+      }
+  }
+  return 0;
+}
+

 char *
 x_get_keysym_name (int keysym)
@@ -4503,10 +4553,10 @@ ns_term_shutdown (int sig)
   Mouse_HLInfo *hlinfo = MOUSE_HL_INFO (emacsframe);
   int code;
   unsigned fnKeysym = 0;
-  int flags;
   static NSMutableArray *nsEvArray;
   static BOOL firstTime = YES;
   int left_is_none;
+  unsigned int flags = [theEvent modifierFlags];

   NSTRACE (keyDown);

@@ -4550,9 +4600,13 @@ ns_term_shutdown (int sig)
       code = ([[theEvent charactersIgnoringModifiers] length] == 0) ?
         0 : [[theEvent charactersIgnoringModifiers] characterAtIndex: 0];
       /* (Carbon way: [theEvent keyCode]) */
+      

       /* is it a "function key"? */
-      fnKeysym = ns_convert_key (code);
+      if (code < 0x00ff && (flags & NSNumericPadKeyMask) )
+   fnKeysym = ns_convert_keypad([theEvent keyCode]);
+      else
+   fnKeysym = ns_convert_key(code);
       if (fnKeysym)
         {
           /* COUNTERHACK: map 'Delete' on upper-right main KB to 'Backspace',
@@ -4565,7 +4619,6 @@ ns_term_shutdown (int sig)

       /* are there modifiers? */
       emacs_event->modifiers = 0;
-      flags = [theEvent modifierFlags];

       if (flags & NSHelpKeyMask)
           emacs_event->modifiers |= hyper_modifier;

答案 1 :(得分:0)

我尝试使用较旧的Emacs:

这是GNU Emacs 22.2.1(powerpc-apple-darwin9.5.0,GTK + Version 2.10.13)

使用+ gtk + x11的ports collection构建并与X11服务器XQuartz 2.1.6(xorg-server 1.4.2-apple33)一起使用,当我查看C-h l时,我得到了

<kp-0> ... <kp-9>

为数字。和

<kp-enter> <kp-subtract> <kp-multiply> <kp-divide> <kp-equal>

其他键。

我建议使用选项+ gtk和+ x11从MacPorts构建最新的Emacs。

然后我会得到最新的XQuartz并在X11上运行Emacs(我更喜欢这种更原生的构建,因为无论它是否在另一个操作系统上远程运行(通常是通过{{1),Emacs总是表现相同}}或本地。

我将在下周将我的端口升级到最新的Emacs,并为这些添加结果。

答案 2 :(得分:0)

这个问题是emacs的Cocoa变种所独有的。 Carbon版本中没有这个问题,即emacs22。我更新了上面发布的补丁,现在效果更好。它可能适用于使用XCode 3的Emacs23代码库。如果您使用XCode 4,像我一样,您将需要使用目前仅在GIT存储库中可用的Emacs24代码库。以下是通过XCode 4构建Emacs24的非常好的描述

[http://mikbe.tk/2011/04/18/build-emacs-with-xcode-4/] [1]

答案 3 :(得分:0)

这是Emacs 23.3翻译的Emacs 24补丁M. D. Marchionna在此页面上发布。

--- nsterm-orig.m   2011-11-13 17:51:47.000000000 -0500
+++ nsterm.m    2011-11-13 17:39:56.000000000 -0500
@@ -87,6 +87,7 @@
   NSBeginFunctionKey,           0x58,
   NSSelectFunctionKey,          0x60,
   NSPrintFunctionKey,           0x61,
+  NSClearLineFunctionKey,       0x0B,
   NSExecuteFunctionKey,         0x62,
   NSInsertFunctionKey,          0x63,
   NSUndoFunctionKey,            0x65,
@@ -134,6 +135,33 @@
   0x1B,                         0x1B   /* escape */
 };

+static unsigned convert_nskeypad_to_X_keysym[] =
+{
+  /* Arrow keys are both function and keypad keys */
+  NSLeftArrowFunctionKey,       0x51,
+  NSUpArrowFunctionKey,         0x52,
+  NSRightArrowFunctionKey,      0x53,
+  NSDownArrowFunctionKey,       0x54,
+
+  0x41,                         0xAE,  /* KP_Decimal */
+  0x43,                         0xAA,  /* KP_Multiply */
+  0x45,                         0xAB,  /* KP_Add */
+  0x4B,                         0xAF,  /* KP_Divide */
+  0x4E,                         0xAD,  /* KP_Subtract */
+  0x51,                         0xBD,  /* KP_Equal */
+  0x52,                         0xB0,  /* KP_0 */
+  0x53,                         0xB1,  /* KP_1 */
+  0x54,                         0xB2,  /* KP_2 */
+  0x55,                         0xB3,  /* KP_3 */
+  0x56,                         0xB4,  /* KP_4 */
+  0x57,                         0xB5,  /* KP_5 */
+  0x58,                         0xB6,  /* KP_6 */
+  0x59,                         0xB7,  /* KP_7 */
+  0x5B,                         0xB8,  /* KP_8 */
+  0x5C,                         0xB9,  /* KP_9 */
+  // The enter key is on the keypad but modifier isnt set
+  NSEnterCharacter,        0x8D
+};

 /* Lisp communications */
 Lisp_Object ns_input_file, ns_input_font, ns_input_fontsize, ns_input_line;
@@ -1842,6 +1870,23 @@
      return code > 0xff ? 0 : 0xFF00 | ns_keycode_to_xkeysym_table[code]; */
 }

+static unsigned
+ns_convert_keypad (unsigned code)
+/* --------------------------------------------------------------------------
+    Internal call used by NSView-keyDown.
+   -------------------------------------------------------------------------- */
+{
+  const unsigned last_keysym = (sizeof (convert_nskeypad_to_X_keysym)
+                                / sizeof (convert_nskeypad_to_X_keysym[0]));
+  unsigned keysym;
+  /* An array would be faster, but less easy to read. */
+  for (keysym = 0; keysym < last_keysym; keysym += 2) {
+      if (code == convert_nskeypad_to_X_keysym[keysym]) {
+        return 0xFF00 | convert_nskeypad_to_X_keysym[keysym+1];
+      }
+  }
+  return 0;
+}

 char *
 x_get_keysym_name (int keysym)
@@ -4349,7 +4394,7 @@
   struct ns_display_info *dpyinfo = FRAME_NS_DISPLAY_INFO (emacsframe);
   int code;
   unsigned fnKeysym = 0;
-  int flags;
+  unsigned int flags = [theEvent modifierFlags];
   static NSMutableArray *nsEvArray;
   static BOOL firstTime = YES;

@@ -4397,6 +4442,9 @@
       /* (Carbon way: [theEvent keyCode]) */

       /* is it a "function key"? */
+      if (code < 0x00ff && (flags & NSNumericPadKeyMask) )
+        fnKeysym = ns_convert_keypad([theEvent keyCode]);
+      else
       fnKeysym = ns_convert_key (code);
       if (fnKeysym)
         {
@@ -4410,8 +4458,6 @@

       /* are there modifiers? */
       emacs_event->modifiers = 0;
-      flags = [theEvent modifierFlags];
-
       if (flags & NSHelpKeyMask)
           emacs_event->modifiers |= hyper_modifier;