Le 27 févr. 07 à 23:15, Jeff Hobbs a écrit :

>   ... I've tried "open document" and variations, but even then I
>  don't get args passed in.

When I tried to get filename to edit from Yummy ftp I had the same  
problem. I finaly found this tricky way to get something usable:

package require tclAE

proc MyAeHandler {class id} {
     set filename [string range [tclAE::coerceDesc              [string range $class [expr {
[string first \[ $class]+1}]              [expr {[string first \] $class]-1}]] TEXT] 1 end-1
]
     if {[file exists $filename] && $::ready} {
         after idle [list FileOpen $filename]
     }
     return [tclAE::print $class]
}

tclAE::installEventHandler aevt odoc MyAeHandler

It works but I know I have to do something cleaner when I'll  
understand how tclAE really works.

-- 
David Zolli
kroc@[...].tk
http://www.kroc.tk



-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys-and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
_______________________________________________
Tcl-mac mailing list
tcl-mac@[...].net
https://lists.sourceforge.net/lists/listinfo/tcl-mac