[Mac-emacs-users] Emacs 21.1 AppleScript and Command Key for OS X

[Rodney S. <rsp...@wi...>]

*** open/emacs/emacs-21.1/src/mac.c	Thu Dec 27 11:12:26 2001
--- ./mac.c	Thu Dec 27 10:37:09 2001
***************
*** 2508,2513 ****
--- 2508,2521 ----
  }
  
  
+ DEFUN ("initialize-applescript", Finitialize_applescript, Sinitialize_applescript, 0, 0, 0,
+     "Initialize AppleScript.\n")
+      ()
+ {
+   initialize_applescript ();
+ }
+ 
+ 
  DEFUN ("do-applescript", Fdo_applescript, Sdo_applescript, 1, 1, 0,
      "Compile and execute AppleScript SCRIPT and retrieve and return the\n\
  result.  If compilation and execution are successful, the resulting script\n\
***************
*** 2755,2758 ****
--- 2763,2767 ----
    defsubr (&Sdo_applescript);
    defsubr (&Smac_file_name_to_posix);
    defsubr (&Sposix_file_name_to_mac);
+   defsubr (&Sinitialize_applescript);
  }