Enlightenment CVS committal
Author : tsauerbeck
Project : e17
Module : apps/euphoria
Dir : e17/apps/euphoria/bin
Modified Files:
euphoria
Log Message:
playlist might emit file_dialog.open, too
===================================================================
RCS file: /cvsroot/enlightenment/e17/apps/euphoria/bin/euphoria,v
retrieving revision 1.21
retrieving revision 1.22
diff -u -3 -r1.21 -r1.22
--- euphoria 7 May 2005 10:43:22 -0000 1.21
+++ euphoria 7 May 2005 16:15:24 -0000 1.22
@@ -1,6 +1,6 @@
#!/usr/bin/ruby -w
-# $Id: euphoria,v 1.21 2005/05/07 10:43:22 tsauerbeck Exp $
+# $Id: euphoria,v 1.22 2005/05/07 16:15:24 tsauerbeck Exp $
require "ecore"
require "ecore_x"
@@ -104,6 +104,22 @@
File.open(@config_file, "w") { |fo| YAML.dump(@config, fo) }
end
+ def show_file_dialog
+ fd = File.expand_path("~/.xmms2/clients/euphoria/themes/fd.eet")
+ FileDialog.open(fd) do |sel|
+ if File.directory?(sel)
+ files = []
+ Find.find(sel) { |f| files.unshift(f) if
File.file?(f) }
+
+ files.each do |f|
+ @xmms.playlist_add("file://" + f).wait
+ end
+ elsif File.exists?(sel)
+ @xmms.playlist_add("file://" + file).wait
+ end
+ end
+ end
+
private
def init_gui
@ee = Ecore::Evas::SoftwareX11.new
@@ -217,19 +233,7 @@
@edje.on_signal("playlist.open") { @playlist.show(@theme, true)
}
@edje.on_signal("file_dialog.open") do
- fd =
File.expand_path("~/.xmms2/clients/euphoria/themes/fd.eet")
- FileDialog.open(fd) do |sel|
- if File.directory?(sel)
- files = []
- Find.find(sel) { |f| files.unshift(f)
if File.file?(f) }
-
- files.each do |f|
- @xmms.playlist_add("file://" +
f).wait
- end
- elsif File.exists?(sel)
- @xmms.playlist_add("file://" +
file).wait
- end
- end
+ show_file_dialog
end
@edje.on_signal("TOGGLE_REPEAT_MODE") do |sig, source|
-------------------------------------------------------
This SF.Net email is sponsored by: NEC IT Guy Games.
Get your fingers limbered up and give it your best shot. 4 great events, 4
opportunities to win big! Highest score wins.NEC IT Guy Games. Play to
win an NEC 61 plasma display. Visit http://www.necitguy.com/?r=20
_______________________________________________
enlightenment-cvs mailing list
enlightenment-cvs@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/enlightenment-cvs
