[X2Go-Commits] [mteleplayer] 01/01: Adding FileChooserDialog...

[git-admin at x2go.org]

This is an automated email from the git hooks/post-receive script.

x2go pushed a commit to branch master
in repository mteleplayer.

commit b56f9d6f63e77399637626e2cdf883862b46435c
Author: gznget <opensource at gznianguan.com>
Date:   Thu Jun 26 22:44:04 2014 +0200

    Adding FileChooserDialog...
---
 serverside/bin/mteleplayer |   22 +++++++++++++++++++++-
 1 file changed, 21 insertions(+), 1 deletion(-)

diff --git a/serverside/bin/mteleplayer b/serverside/bin/mteleplayer
index afd0e54..94dbcbd 100755
--- a/serverside/bin/mteleplayer
+++ b/serverside/bin/mteleplayer
@@ -909,7 +909,7 @@ sub theMenuTreeSUB {
 		item_type  => '<Branch>',
 		children => [
 			'Play _File'       => {
-				callback => sub { appDBugLog("menuPlayFullScreen"); },
+				callback => \&crankFileChooser,
 				callback_action => $action++,
 			},
 			'Play _URL'      => {
@@ -953,6 +953,26 @@ sub theMenuTreeSUB {
   return $menu_tree;
 }
 
+########################################################################################################
+# File CHOOSER  And file loading/enqueueing... (Though at the moment it just starts playback...)
+sub crankFileChooser {
+  my $fileFilter = Gtk2::FileFilter->new;
+  $fileFilter->set_name ("Media Files");
+  $fileFilter->add_mime_type("audio/*");
+  $fileFilter->add_mime_type("video/*");
+  my $theFileChooser = Gtk2::FileChooserDialog->new ('Open media file...', undef, 'open', 'gtk-cancel' => 'cancel', 'gtk-ok' => 'ok');
+  $theFileChooser->add_filter($fileFilter);
+  if ($theFileChooser->run eq 'ok') {
+    my $playThisFile = $theFileChooser->get_filename;
+    if (-f $playThisFile) {
+      my $isItLoaded = mtpTeKiRemoteFileSetup("FILE:$playThisFile","$X2GoTKSHome/remote/appData/mteleplayer\_$selfSID");
+      if ($isItLoaded ne 0) {
+        actOnEnqueuedMEDIA($isItLoaded,"FILE");
+      }
+    }
+  }
+  $theFileChooser->destroy;
+}
 
 ########################################################################################################
 # GET Media FILE Info 

--
Alioth's /srv/git/_hooks_/post-receive-email on /srv/git/code.x2go.org/mteleplayer.git