Revision: 10595 http://pure-data.svn.sourceforge.net/pure-data/?rev=10595&view=rev Author: eighthave Date: 2009-01-22 01:48:31 +0000 (Thu, 22 Jan 2009)

Log Message: ----------- enabled the File->Open panel to open multiple files at once

Modified Paths: -------------- branches/pd-extended/0.41/pd/src/u_main.tk

Modified: branches/pd-extended/0.41/pd/src/u_main.tk =================================================================== --- branches/pd-extended/0.41/pd/src/u_main.tk 2009-01-22 01:22:52 UTC (rev 10594) +++ branches/pd-extended/0.41/pd/src/u_main.tk 2009-01-22 01:48:31 UTC (rev 10595) @@ -503,9 +503,14 @@

proc menu_open {} { global pd_opendir filetypes - set filename [tk_getOpenFile -defaultextension .pd \ + set files [tk_getOpenFile -defaultextension .pd \ + -multiple true \ -filetypes $filetypes -initialdir $pd_opendir] - if {$filename != ""} {open_file $filename} + if {$files != ""} { + foreach filename $files { + open_file $filename + } + } }

proc open_file {filename} {

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