Tk-Components

Check-in [19a8a45d31]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:More updates to aem
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1:19a8a45d312235fbc32c7a4cf72fd2b9c9147283
User & Date: kevin 2015-07-12 04:09:34
Context
2015-07-13
03:25
aem changes check-in: 1554d3738e user: kevin tags: trunk
2015-07-12
04:09
More updates to aem check-in: 19a8a45d31 user: kevin tags: trunk
03:42
Updates to launcher module check-in: 5da1731fb5 user: kevin tags: trunk
Changes
Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Changes to aem/macosx/aem.c.

    95     95     CFStringRef arg = CFStringCreateWithBytes(0, paramstring, sizeof(paramstring),
    96     96   					    kCFStringEncodingUTF8, false);
    97     97     int len; 
    98     98     len = CFStringGetMaximumSizeForEncoding(CFStringGetLength(arg), kCFStringEncodingUTF8);
    99     99     Tcl_DStringInit(&as_arg);
   100    100     Tcl_DStringSetLength(&as_arg, len);
   101    101   
   102         -  Tcl_DStringValue(&as_arg) = CFStringGetCStringPtr(arg,kCFStringEncodingUTF8);
          102  +  Tcl_DStringValue(&as_arg) = CFStringGetCStringPtr(arg, kCFStringEncodingUTF8);
   103    103      
   104    104     /*  Get command keyed to eventID from dict and pass to Tcl for execution. */
   105    105     CFTypeRef scriptName;
   106    106     stringeventID = UTCreateStringForOSType(eventID);
   107    107     scriptName = CFDictionaryGetValue(aeDict, stringeventID);
   108    108     CFStringRef cfcmd;
   109    109     if (scriptName == NULL) {
................................................................................
   134    134     /*  Pass results back to AppleScript, clean up. */
   135    135     err= AEPutParamPtr(reply, keyDirectObject, typeUTF8Text, output, strlen(output));
   136    136     if (err !=noErr) {
   137    137       fprintf(stderr, "Unable to execute %s\n", applescript_tcl_cmd);
   138    138     }
   139    139     CFRelease(scriptName);
   140    140     CFRelease(arg);
   141         -  Tcl_DStringFree(&as_arg);
   142    141     return err;
   143    142   }
   144    143   
   145    144     
   146    145   /*Initalize the package in the tcl interpreter, create Tcl commands. */
   147    146   int Aem_Init (Tcl_Interp *interp) {
   148    147   

Changes to launcher/launcher.html.

     1      1   <HTML>
            2  +<HEAD>
            3  +<TITLE>launcher</TITLE>
            4  +</HEAD>
     2      5   <BODY>
            6  +<H1>launcher</H1>
            7  +<HR>
     3      8   <PRE>
     4      9   <!-- Manpage converted by man2html 3.0.1 -->
     5         -package require launcher
     6         -.PP
     7         -launcher::launchurl url?
     8         -.PP
     9         -launcher::launchfile file?
    10         -.PP
    11         -launcher::getapppath
    12         -.PP
    13         -launcher::getdefaultapp url
    14         -.PP
    15         -launcher::setdefaultapp url path-to-app
    16         -.RE
    17         -.PP
           10  +
           11  +</PRE>
           12  +<H2>SYNPOSIS</H2><PRE>
           13  +       package require launcher
           14  +
           15  +       launcher::launchurl url?
           16  +
           17  +       launcher::launchfile file?
           18  +
           19  +       launcher::getapppath
           20  +
           21  +       launcher::getdefaultapp url
           22  +
           23  +       launcher::setdefaultapp url path-to-app
           24  +
           25  +
           26  +
           27  +
           28  +</PRE>
           29  +<H2>DESCRIPTION</H2><PRE>
           30  +       This  module  allows you to launch a URL or a file on the Mac using the
           31  +       system's default application for that URL or  file  type.  It  provides
           32  +       similar  functionality  to  the  "/usr/bin/open" command-line tool, but
           33  +       works without shelling out to an external  program.  The  package  also
           34  +       allows  you  to query the system for a default app for a particular URL
           35  +       type, i.e. http://, and also to set the default app  for  a  particular
           36  +       URL.  Finally,  the  module  provides a convenience function to get the
           37  +       current app path.
           38  +
           39  +
           40  +</PRE>
           41  +<H2>EXAMPLES</H2><PRE>
           42  +       launcher::launchurl http://www.apple.com
           43  +
           44  +       launcher::launch file ~/Desktop/test.txt
           45  +
           46  +       launcher::getapppath launcher::getdefaultapp http launcher::setdefault-
           47  +       app x-man-page [launcher::getapppath]
           48  +
           49  +
           50  +
           51  +
    18     52   
    19         -.SH DESCRIPTION
    20         -
    21         -This module allows you to launch a URL or a file on the Mac using the system's default application for that URL or file type. It provides similar functionality to the "/usr/bin/open" command-line tool, but works without shelling out to an external program. The package also allows you to query the system for a default app for a particular URL type, i.e. http://, and also to set the default app for a particular URL. Finally, the module provides a convenience function to get the current app path.
    22         -.SH EXAMPLES
    23         -
    24         -launcher::launchurl http://www.apple.com
    25         -launcher::launch file ~/Desktop/test.txt
    26         -launcher::getapppath
    27         -launcher::getdefaultapp http
    28         -launcher::setdefaultapp x-man-page [launcher::getapppath]
    29         -.RE
    30         -.PP
    31         -
           53  +                                                        launcher(11 July 2015)
    32     54   </PRE>
    33     55   <HR>
    34     56   <ADDRESS>
    35     57   Man(1) output converted with
    36     58   <a href="http://www.oac.uci.edu/indiv/ehood/man2html.html">man2html</a>
    37     59   </ADDRESS>
    38     60   </BODY>
    39     61   </HTML>

Changes to launcher/launcher.n.

     1      1   .\" Text automatically generated by txt2man
     2         -.TH untitled  "11 July 2015" "" ""
            2  +.TH launcher "11 July 2015" "" ""
     3      3   .SH NAME
     4      4   \fBlauncher
     5      5   \fB
     6      6   .SH SYNPOSIS
     7      7   
     8      8   package require launcher
     9      9   .PP
................................................................................
    21     21   
    22     22   .SH DESCRIPTION
    23     23   
    24     24   This module allows you to launch a URL or a file on the Mac using the system's default application for that URL or file type. It provides similar functionality to the "/usr/bin/open" command-line tool, but works without shelling out to an external program. The package also allows you to query the system for a default app for a particular URL type, i.e. http://, and also to set the default app for a particular URL. Finally, the module provides a convenience function to get the current app path.
    25     25   .SH EXAMPLES
    26     26   
    27     27   launcher::launchurl http://www.apple.com
           28  +
    28     29   launcher::launch file ~/Desktop/test.txt
           30  +
    29     31   launcher::getapppath
    30     32   launcher::getdefaultapp http
    31     33   launcher::setdefaultapp x-man-page [launcher::getapppath]
    32     34   .RE
    33     35   .PP
    34     36   

Changes to launcher/launcher.txt.

    18     18   
    19     19   DESCRIPTION
    20     20   
    21     21   This module allows you to launch a URL or a file on the Mac using the system's default application for that URL or file type. It provides similar functionality to the "/usr/bin/open" command-line tool, but works without shelling out to an external program. The package also allows you to query the system for a default app for a particular URL type, i.e. http://, and also to set the default app for a particular URL. Finally, the module provides a convenience function to get the current app path.
    22     22   
    23     23   EXAMPLES
    24     24   
    25         - launcher::launchurl http://www.apple.com
    26         - launcher::launch file ~/Desktop/test.txt
    27         - launcher::getapppath
    28         - launcher::getdefaultapp http
           25  +launcher::launchurl http://www.apple.com
           26  +
           27  +launcher::launch file ~/Desktop/test.txt
           28  +
           29  +launcher::getapppath
           30  +
           31  +launcher::getdefaultapp http
           32  +
    29     33    launcher::setdefaultapp x-man-page [launcher::getapppath]
    30     34   
    31     35