Revision: 10734 http://pure-data.svn.sourceforge.net/pure-data/?rev=10734&view=rev Author: eighthave Date: 2009-02-04 06:24:04 +0000 (Wed, 04 Feb 2009)

Log Message: ----------- enable drag-n-dropping of files on Mac OS X

Modified Paths: -------------- branches/pd-devel/0.41.4/src/apple_events.tcl

Modified: branches/pd-devel/0.41.4/src/apple_events.tcl =================================================================== --- branches/pd-devel/0.41.4/src/apple_events.tcl 2009-02-04 06:04:54 UTC (rev 10733) +++ branches/pd-devel/0.41.4/src/apple_events.tcl 2009-02-04 06:24:04 UTC (rev 10734) @@ -1,6 +1,8 @@

package provide apple_events 0.1

+package require wheredoesthisgo + # from http://wiki.tcl.tk/12987

# minimum line thickness to anti-alias (default: 3) @@ -11,8 +13,10 @@

# kAEOpenDocuments proc ::tk::mac::OpenDocument {args} { - # TODO - # args will be a list of all the documents dropped on your app, or double-clicked + foreach filename $files { + puts "open_file $filename" + open_file $filename + } }

# kEventAppHidden

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.