home *** CD-ROM | disk | FTP | other *** search
/ vim.ftp.fu-berlin.de / 2015-02-03.vim.ftp.fu-berlin.de.tar / vim.ftp.fu-berlin.de / patches / 7.1 / 7.1.285 < prev    next >
Encoding:
Internet Message Format  |  2008-03-19  |  5.7 KB
  1. To: vim-dev@vim.org
  2. Subject: Patch 7.1.285 (extra)
  3. Fcc: outbox
  4. From: Bram Moolenaar <Bram@moolenaar.net>
  5. Mime-Version: 1.0
  6. Content-Type: text/plain; charset=ISO-8859-1
  7. Content-Transfer-Encoding: 8bit
  8. ------------
  9.  
  10. Patch 7.1.285 (extra)
  11. Problem:    Mac: dialog hotkeys don't work.
  12. Solution:   Add hotkey support. (Dan Sandler)
  13. Files:        src/gui_mac.c
  14.  
  15.  
  16. *** ../vim-7.1.284/src/gui_mac.c    Wed Mar 12 21:47:31 2008
  17. --- src/gui_mac.c    Sun Mar 16 15:25:13 2008
  18. ***************
  19. *** 153,158 ****
  20. --- 153,161 ----
  21.   /* Keeping track of which scrollbar is being dragged */
  22.   static ControlHandle dragged_sb = NULL;
  23.   
  24. + /* Vector of char_u --> control index for hotkeys in dialogs */
  25. + static short *gDialogHotKeys;
  26. + 
  27.   static struct
  28.   {
  29.       FMFontFamily family;
  30. ***************
  31. *** 5519,5524 ****
  32. --- 5522,5570 ----
  33.       SetDialogItemText(itemHandle, itemName);
  34.   }
  35.   
  36. + 
  37. + /* ModalDialog() handler for message dialogs that have hotkey accelerators.
  38. +  * Expects a mapping of hotkey char to control index in gDialogHotKeys;
  39. +  * setting gDialogHotKeys to NULL disables any hotkey handling.
  40. +  */
  41. +     static pascal Boolean
  42. + DialogHotkeyFilterProc (
  43. +     DialogRef        theDialog,
  44. +     EventRecord        *event,
  45. +     DialogItemIndex *itemHit)
  46. + {
  47. +     char_u keyHit;
  48. + 
  49. +     if (event->what == keyDown || event->what == autoKey)
  50. +     {
  51. +     keyHit = (event->message & charCodeMask);
  52. + 
  53. +     if (gDialogHotKeys && gDialogHotKeys[keyHit])
  54. +     {
  55. + #ifdef DEBUG_MAC_DIALOG_HOTKEYS
  56. +         printf("user pressed hotkey '%c' --> item %d\n", keyHit, gDialogHotKeys[keyHit]);
  57. + #endif
  58. +         *itemHit = gDialogHotKeys[keyHit];
  59. + 
  60. +         /* When handing off to StdFilterProc, pretend that the user
  61. +          * clicked the control manually. Note that this is also supposed
  62. +          * to cause the button to hilite briefly (to give some user
  63. +          * feedback), but this seems not to actually work (or it's too
  64. +          * fast to be seen).
  65. +          */
  66. +         event->what = kEventControlSimulateHit;
  67. + 
  68. +         return true; /* we took care of it */
  69. +     }
  70. + 
  71. +     /* Defer to the OS's standard behavior for this event.
  72. +      * This ensures that Enter will still activate the default button. */
  73. +     return StdFilterProc(theDialog, event, itemHit);
  74. +     }
  75. +     return false;      /* Let ModalDialog deal with it */
  76. + }
  77. + 
  78. + 
  79.   /* TODO: There have been some crashes with dialogs, check your inbox
  80.    * (Jussi)
  81.    */
  82. ***************
  83. *** 5544,5549 ****
  84. --- 5590,5597 ----
  85.       GrafPtr    oldPort;
  86.       short    itemHit;
  87.       char_u    *buttonChar;
  88. +     short    hotKeys[256];        /* map of hotkey -> control ID */
  89. +     char_u    aHotKey;
  90.       Rect    box;
  91.       short    button;
  92.       short    lastButton;
  93. ***************
  94. *** 5571,5576 ****
  95. --- 5619,5626 ----
  96.   
  97.       WindowRef    theWindow;
  98.   
  99. +     ModalFilterUPP dialogUPP;
  100. + 
  101.       /* Check 'v' flag in 'guioptions': vertical button placement. */
  102.       vertical = (vim_strchr(p_go, GO_VERTICAL) != NULL);
  103.   
  104. ***************
  105. *** 5610,5615 ****
  106. --- 5660,5668 ----
  107.       buttonChar = buttons;
  108.       button = 0;
  109.   
  110. +     /* initialize the hotkey mapping */
  111. +     memset(hotKeys, 0, sizeof(hotKeys));
  112. + 
  113.       for (;*buttonChar != 0;)
  114.       {
  115.       /* Get the name of the button */
  116. ***************
  117. *** 5619,5625 ****
  118. --- 5672,5689 ----
  119.       {
  120.           if (*buttonChar != DLG_HOTKEY_CHAR)
  121.           name[++len] = *buttonChar;
  122. +         else
  123. +         {
  124. +         aHotKey = (char_u)*(buttonChar+1);
  125. +         if (aHotKey >= 'A' && aHotKey <= 'Z')
  126. +             aHotKey = (char_u)((int)aHotKey + (int)'a' - (int)'A');
  127. +         hotKeys[aHotKey] = button;
  128. + #ifdef DEBUG_MAC_DIALOG_HOTKEYS
  129. +         printf("### hotKey for button %d is '%c'\n", button, aHotKey);
  130. + #endif
  131. +         }
  132.       }
  133. + 
  134.       if (*buttonChar != 0)
  135.         buttonChar++;
  136.       name[0] = len;
  137. ***************
  138. *** 5688,5694 ****
  139. --- 5752,5764 ----
  140.       (void) C2PascalString(textfield, &name);
  141.       SetDialogItemText(itemHandle, name);
  142.       inputItm.width = StringWidth(name);
  143. + 
  144. +     /* Hotkeys don't make sense if there's a text field */
  145. +     gDialogHotKeys = NULL;
  146.       }
  147. +     else
  148. +     /* Install hotkey table */
  149. +     gDialogHotKeys = (short *)&hotKeys;
  150.   
  151.       /* Set the <ENTER> and <ESC> button. */
  152.       SetDialogDefaultItem(theDialog, dfltbutton);
  153. ***************
  154. *** 5777,5786 ****
  155.       dialog_busy = TRUE;
  156.   #endif
  157.   
  158.       /* Hang until one of the button is hit */
  159.       do
  160.       {
  161. !     ModalDialog(nil, &itemHit);
  162.       } while ((itemHit < 1) || (itemHit > lastButton));
  163.   
  164.   #ifdef USE_CARBONKEYHANDLER
  165. --- 5847,5859 ----
  166.       dialog_busy = TRUE;
  167.   #endif
  168.   
  169. +     /* Prepare the shortcut-handling filterProc for handing to the dialog */
  170. +     dialogUPP = NewModalFilterUPP(DialogHotkeyFilterProc);
  171. + 
  172.       /* Hang until one of the button is hit */
  173.       do
  174.       {
  175. !     ModalDialog(dialogUPP, &itemHit);
  176.       } while ((itemHit < 1) || (itemHit > lastButton));
  177.   
  178.   #ifdef USE_CARBONKEYHANDLER
  179. ***************
  180. *** 5803,5808 ****
  181. --- 5876,5884 ----
  182.       /* Restore the original graphical port */
  183.       SetPort(oldPort);
  184.   
  185. +     /* Free the modal filterProc */
  186. +     DisposeRoutineDescriptor(dialogUPP);
  187. + 
  188.       /* Get ride of th edialog (free memory) */
  189.       DisposeDialog(theDialog);
  190.   
  191. *** ../vim-7.1.284/src/version.c    Thu Mar 20 13:22:47 2008
  192. --- src/version.c    Thu Mar 20 14:38:06 2008
  193. ***************
  194. *** 668,669 ****
  195. --- 668,671 ----
  196.   {   /* Add new patch number below this line */
  197. + /**/
  198. +     285,
  199.   /**/
  200.  
  201. -- 
  202. hundred-and-one symptoms of being an internet addict:
  203. 163. You go outside for the fresh air (at -30 degrees) but open the
  204.      window first to hear new mail arrive.
  205.  
  206.  /// Bram Moolenaar -- Bram@Moolenaar.net -- http://www.Moolenaar.net   \\\
  207. ///        sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\
  208. \\\        download, build and distribute -- http://www.A-A-P.org        ///
  209.  \\\            help me help AIDS victims -- http://ICCF-Holland.org    ///
  210.