zik 0.16.1

data/gui/gui.rb

@@ -0,0 +1,1383 @@
+# encoding: UTF-8
+=begin
+Copyright 2007-2011 Vincent Carmona
+
+This file is part of ZiK.
+
+    ZiK is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    ZiK is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with ZiK; if not, write to the Free Software
+    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+=end
+
+class Gui < Gtk::Window
+	include Pack
+
+	type_register#needded to implement new signals
+	attr_reader :renderer2
+	attr_reader :vbox, :selectview, :cm_list, :menu_bar#needded for modules, in gui/mod.rb
+	attr_reader :playlist, :config, :list_selection#needded for modules
+
+	signal_new('play', GLib::Signal::RUN_FIRST, nil, nil, Song)
+	def signal_do_play(song); end
+	signal_new('stop', GLib::Signal::RUN_FIRST, nil, nil)
+	def signal_do_stop; end
+
+	def initialize(player, playlist, config, cdplayer=nil, cdlist=nil, radioplayer=nil, radiolist=nil)
+		@player=player
+		@active_view='default'
+		@playlist=playlist
+		@config=config
+		if $cd
+			@cdplayer=cdplayer
+			@cdlist=cdlist
+		end
+		if $radio
+			@radiolist=radiolist
+			@radioplayer=radioplayer
+		end
+		
+		@editing=false
+		@seeking=false
+		@nb_timeout=0
+		
+#*********************Menu zone*******************************
+#Music menu
+		@play_it=Gtk::ImageMenuItem.new(Gtk::Stock::MEDIA_PLAY)
+		@play_it.signal_connect('activate'){play}
+		@pause_it=Gtk::ImageMenuItem.new(Gtk::Stock::MEDIA_PAUSE)
+		@pause_it.signal_connect('activate'){pause}
+		@stop_it=Gtk::ImageMenuItem.new(Gtk::Stock::MEDIA_STOP)
+		@stop_it.signal_connect('activate'){stop}
+		@previous_it=Gtk::ImageMenuItem.new(Gtk::Stock::MEDIA_PREVIOUS)
+		@previous_it.signal_connect('activate'){previous_song}
+		@next_it=Gtk::ImageMenuItem.new(Gtk::Stock::MEDIA_NEXT)
+		@next_it.signal_connect('activate'){next_song}
+		@separator_it=Gtk::SeparatorMenuItem.new
+		@shuffle_it=Gtk::CheckMenuItem.new(_('Shuffle'))
+		@shuffle_it.active=@config['shuffle']
+		@shuffle_it.signal_connect('toggled'){self.shuffle=@shuffle_it.active?}
+		@repeat_it=Gtk::CheckMenuItem.new(_('Repeat'))
+		@repeat_it.active=@config['repeat']
+		@repeat_it.signal_connect('toggled'){self.repeat=@repeat_it.active?}
+		@separator_it2=Gtk::SeparatorMenuItem.new
+		@preference_it=Gtk::ImageMenuItem.new(Gtk::Stock::PREFERENCES)
+		@preference_it.signal_connect('activate'){
+			if $cd
+				Preference_window.show(self, @playlist, @config, :player, @cdlist, @cdplayer, @wcd)
+			else
+				Preference_window.show(self, @playlist, @config, :player)
+			end
+		}
+		@quit_it=Gtk::ImageMenuItem.new(Gtk::Stock::QUIT)
+		@quit_it.signal_connect('activate'){quit}
+
+		@music_menu=Gtk::Menu.new
+		[@play_it, @pause_it, @stop_it,@previous_it, @next_it, @separator_it, @shuffle_it, @repeat_it, @separator_it2,
+			@preference_it, @quit_it].each{|it|
+				@music_menu.append(it)
+			}
+
+#Browser menu
+		@refreshtree_it=Gtk::ImageMenuItem.new(Gtk::Stock::REFRESH)
+		@refreshtree_it.signal_connect('activate'){refresh_treestore(@config['directory'],@config['extension'])}
+		@find_it=Gtk::ImageMenuItem.new(Gtk::Stock::FIND)
+		@find_it.signal_connect('activate'){BrowseSearchWindow.show(self,@config)}
+		@preference_it2=Gtk::ImageMenuItem.new(Gtk::Stock::PREFERENCES)
+		@preference_it2.signal_connect('activate'){
+			if $cd
+				Preference_window.show(self, @playlist, @config, :browse, @cdlist, @cdplayer, @wcd)
+			else
+				Preference_window.show(self, @playlist, @config, :browse)
+			end
+		}
+		
+		@browse_menu=Gtk::Menu.new
+		[@refreshtree_it, @find_it, @preference_it2].each{|it| @browse_menu.append(it)}
+
+#Playlist menu
+		@add_it=Gtk::ImageMenuItem.new(Gtk::Stock::ADD)
+		@add_it.signal_connect('activate'){import_list}
+		@rm_it=Gtk::ImageMenuItem.new(Gtk::Stock::REMOVE)
+		@rm_it.signal_connect('activate'){list_rm(@list_selection)}
+		@clear_it=Gtk::ImageMenuItem.new(Gtk::Stock::CLEAR)
+		@clear_it.signal_connect('activate'){list_clear}
+		@find2_it=Gtk::ImageMenuItem.new(Gtk::Stock::FIND)
+		@find2_it.signal_connect('activate'){search}
+		@edit_it=Gtk::ImageMenuItem.new(Gtk::Stock::EDIT)
+		@edit_it.signal_connect('activate'){list_edit}
+		@bsave=Gtk::ImageMenuItem.new(Gtk::Stock::SAVE)
+		@separator_it2=Gtk::SeparatorMenuItem.new
+		@bsave.signal_connect('activate'){list_save}
+		@separator_it3=Gtk::SeparatorMenuItem.new
+		@bexport=Gtk::MenuItem.new(_("Export songs"))
+		@bexport.tooltip_text=_("Copy songs to a directory and write the selected playlist file.")
+		@bexport.signal_connect('activate'){export_songs}
+		@preference_it3=Gtk::ImageMenuItem.new(Gtk::Stock::PREFERENCES)
+		@preference_it3.signal_connect('activate'){
+			if $cd
+				Preference_window.show(self, @playlist, @config, :playlist, @cdlist, @cdplayer, @wcd)
+			else
+				Preference_window.show(self,@playlist,@config,:playlist)
+			end
+		}
+		
+		@playlist_menu=Gtk::Menu.new
+#Do not show @edit_it. See bug 28638
+#Fixme
+#		[@add_it, @rm_it, @clear_it, @find2_it, @edit_it, @bsave, @separator_it2, @bexport,
+		[@add_it, @rm_it, @clear_it, @find2_it, @bsave, @separator_it2, @bexport,
+			@separator_it3, @preference_it3].each{|it| @playlist_menu.append(it)}
+
+#Radio menu
+		if $radio
+			@add_rit=Gtk::ImageMenuItem.new(Gtk::Stock::ADD)
+			@add_rit.signal_connect('activate'){@wradio.add_radio}
+			@rm_rit=Gtk::ImageMenuItem.new(Gtk::Stock::REMOVE)
+			@rm_rit.signal_connect('activate'){
+				current_removed=@wradio.rm
+				if @active_view=='radio'
+					@radioplayer.stop if current_removed
+				end
+			}
+			@clear_rit=Gtk::ImageMenuItem.new(Gtk::Stock::CLEAR)
+			@clear_rit.signal_connect('activate'){@radioplayer.stop; @wradio.clear}
+			@edit_rit=Gtk::ImageMenuItem.new(Gtk::Stock::EDIT)
+			@edit_rit.signal_connect('activate'){radios_edit}
+			@import_rit=Gtk::ImageMenuItem.new(_('_Import'))
+			@import_rit.image=Gtk::Image.new(Gtk::Stock::ADD, Gtk::IconSize::MENU)
+			@import_rit.signal_connect('activate'){@wradio.import}
+			@radio_menu=Gtk::Menu.new
+			[@add_rit, @rm_rit, @clear_rit, @edit_rit, @import_rit].each{|it| @radio_menu.append(it)}
+		end
+
+#Help menu
+		@help_it=Gtk::ImageMenuItem.new(Gtk::Stock::HELP)
+		@help_it.signal_connect('activate'){help}
+		@assistant_it=Gtk::MenuItem.new(_('Assistant'))
+		@assistant_it.signal_connect('activate'){
+			require File.join(Data_dir, 'gui/assistant')
+			Assistant.new(@config, self)
+		}
+		@bug_it=Gtk::MenuItem.new(_('Report a bug'))
+		@bug_it.signal_connect('activate'){
+			unless system('gnome-open http://rubyforge.org/tracker/?group_id=5494')
+				ErrorError.new('Cannot open http://rubyforge.org/tracker/?group_id=5494', true)
+			end
+		}
+		@about_it=Gtk::ImageMenuItem.new(Gtk::Stock::ABOUT)
+		@about_it.signal_connect('activate'){about}
+		
+		@help_menu=Gtk::Menu.new
+		[@help_it, @assistant_it, @bug_it, @about_it].each{|it| @help_menu.append(it)}
+
+#Menu bar
+		@music_it=Gtk::MenuItem.new(_('_Music'))
+		@music_it.set_submenu(@music_menu)
+		@broswe_it=Gtk::MenuItem.new(_('_Browser'))
+		@broswe_it.set_submenu(@browse_menu)
+		@playlist_it=Gtk::MenuItem.new(_('Play_list'))
+		@playlist_it.set_submenu(@playlist_menu)
+		if $radio
+			@radiolist_it=Gtk::MenuItem.new(_('_Radio'))
+			@radiolist_it.set_submenu(@radio_menu)
+		end
+		@help_it2=Gtk::MenuItem.new(_('_Help'))
+		@help_it2.set_submenu(@help_menu)
+		
+		@menu_bar=Gtk::MenuBar.new
+		if $radio
+			[@music_it, @broswe_it, @playlist_it, @radiolist_it, @help_it2].each{|it| @menu_bar.append(it)}
+		else
+			[@music_it, @broswe_it, @playlist_it, @help_it2].each{|it| @menu_bar.append(it)}
+		end
+#*********************Browser zone****************************
+		@treestore=Gtk::TreeStore.new(String,String)
+		GLib::Idle.add{
+			refresh_treestore(@config['directory'], @config['extension'], true)
+			false
+		}
+		
+		@renderer=Gtk::CellRendererText.new
+		@col=Gtk::TreeViewColumn.new(_("Browser"), @renderer, :text => 0)
+		@treeview=Gtk::TreeView.new(@treestore)#See also Gtk::IconView.
+		@treeview.append_column(@col)
+		@treeview.signal_connect("row-activated"){|view, path, column|
+			if @editing
+				@edit_wrapper.add_song(@treestore.get_iter(path)[1])
+			else
+				@playlist.add(@treestore.get_iter(path)[1], @config['extension'])
+				refresh_liststore
+			end
+		}
+		@treeview.signal_connect("button_press_event"){|widget, event|
+			if event.button==3
+				@cm_browse.popup(nil, nil, event.button, event.time)
+			end
+		}
+
+		@tree_selection=@treeview.selection
+		@tree_selection.mode=Gtk::SELECTION_MULTIPLE
+
+
+		@wtree=Gtk::ScrolledWindow.new
+		@wtree.set_policy(Gtk::POLICY_AUTOMATIC,Gtk::POLICY_AUTOMATIC)
+		@wtree.add(@treeview)
+
+#Drag&drop
+		@treeview.enable_model_drag_source(Gdk::Window::BUTTON1_MASK,
+			[['brower-selection', Gtk::Drag::TargetFlags::SAME_APP, DragType::BROWSER_SELECTION]],
+			Gdk::DragContext::ACTION_COPY)
+		#@treeview.signal_connect("drag-data-get"){|widget, context, data, info, time| data.set(Gdk::Selection::TYPE_STRING, 'toto')}
+		#data.uris=[uris1,uris2] crash!
+		@treeview.enable_model_drag_dest([['text/uri-list', Gtk::Drag::TargetFlags::OTHER_APP, DragType::URI_LIST]],
+			Gdk::DragContext::ACTION_COPY)
+		@treeview.signal_connect("drag-data-received"){|widget, context, x, y, data, info, time|
+			if info==DragType::URI_LIST
+				old=@config['directory']
+				data.uris.each{|uri|
+					path=GLib.filename_from_uri(uri)[0]
+					@config['directory']+=path+',' if File.directory?(path)
+				}
+			end
+			refresh_treestore(@config['directory'], @config['extension']) unless old==@config['directory']
+		}
+
+#Context menu
+		@brefresh_browse=Gtk::ImageMenuItem.new(Gtk::Stock::REFRESH)
+		@brefresh_browse.signal_connect('activate'){refresh_treestore(@config['directory'],@config['extension'])}
+		@bfind_browse=Gtk::ImageMenuItem.new(Gtk::Stock::FIND)
+		@bfind_browse.signal_connect('activate'){BrowseSearchWindow.show(self,@config)}
+		@bpreference_browse=Gtk::ImageMenuItem.new(Gtk::Stock::PREFERENCES)
+		@bpreference_browse.signal_connect('activate'){
+			if $cd
+				Preference_window.show(self, @playlist, @config, :browse, @cdlist, @cdplayer, @wcd)
+			else
+				Preference_window.show(self, @playlist, @config, :browse)
+			end
+		}
+		
+		@cm_browse=Gtk::Menu.new
+		@cm_browse.append(@brefresh_browse)
+		@cm_browse.append(@bfind_browse)
+		@cm_browse.append(@bpreference_browse)
+		@cm_browse.show_all
+		
+#*********************Buttons zone*****************************
+		@badd=Gtk::Button.new
+		@badd.image=Gtk::Image.new(Gtk::Stock::ADD,Gtk::IconSize::BUTTON)
+		@badd.tooltip_text=_('Add selected files to playlist')
+		@badd.signal_connect('clicked') {
+			if @editing
+				@edit_wrapper.add_songs(@tree_selection)
+			else
+				list_add(@tree_selection, @config['extension'])
+			end
+		}
+		
+		@brm=Gtk::Button.new
+		@brm.image=Gtk::Image.new(Gtk::Stock::REMOVE,Gtk::IconSize::BUTTON)
+		@brm.tooltip_text=_('Remove selected songs from playlist')
+		@brm.signal_connect('clicked') {@editing ? @edit_wrapper.rm_song : list_rm(@list_selection)}
+		
+		@bclear=Gtk::Button.new
+		@bclear.image=Gtk::Image.new(Gtk::Stock::CLEAR,Gtk::IconSize::BUTTON)
+		@bclear.tooltip_text=_('Clear playlist')
+		@bclear.signal_connect('clicked') {@editing ? @edit_wrapper.clear : list_clear}
+		
+		@bedit=Gtk::Button.new
+		@bedit.image=Gtk::Image.new(Gtk::Stock::EDIT,Gtk::IconSize::BUTTON)
+		@bedit.tooltip_text=_('Edit playlist')
+		@bedit.signal_connect('clicked'){list_edit}
+
+		@bfind=Gtk::Button.new
+		@bfind.image=Gtk::Image.new(Gtk::Stock::FIND, Gtk::IconSize::BUTTON)
+		@bfind.tooltip_text=_('Find in playlist')
+		@bfind.signal_connect('clicked'){@editing ? @edit_wrapper.search : search}
+
+#*********************Playlist zone****************************
+		@list_store=Gtk::ListStore.new(String,TrueClass)
+		refresh_liststore
+		
+		@renderer2=Gtk::CellRendererText.new
+		@renderer2.background=@config['playing_color']
+		@col2=Gtk::TreeViewColumn.new(_("Playlist"), @renderer2, :text => 0, :background_set => 1)
+		@list_view=Gtk::TreeView.new(@list_store)
+		#@list_view.headers_visible=false
+		@list_view.append_column(@col2)
+		@list_view.signal_connect("row-activated"){|view, path, column|
+			@playlist.current=path.to_s.to_i
+			stop
+			play
+		}
+		@list_view.signal_connect("button_press_event"){|widget, event|
+			if event.button==3
+				@cm_list.popup(nil, nil, event.button, event.time)
+			end
+		}
+		compact(@config['compact'])
+		
+		@list_selection=@list_view.selection
+		@list_selection.mode=Gtk::SELECTION_MULTIPLE
+		
+		@wlist=Gtk::ScrolledWindow.new
+		@wlist.set_policy(Gtk::POLICY_AUTOMATIC,Gtk::POLICY_AUTOMATIC)
+		@wlist.add(@list_view)
+		
+#Drag&drop
+		dragtable=[['brower-selection', Gtk::Drag::TargetFlags::SAME_APP, DragType::BROWSER_SELECTION],
+			['text/uri-list', Gtk::Drag::TargetFlags::OTHER_APP, DragType::URI_LIST]]
+		@list_view.enable_model_drag_dest(dragtable, Gdk::DragContext::ACTION_COPY)
+		@list_view.signal_connect("drag-data-received"){|widget, context, x, y, data, info, time|
+			case info
+			when DragType::BROWSER_SELECTION
+				r=@list_view.get_dest_row(x, y)
+				if r.nil?
+					list_add(@tree_selection, @config['extension'])
+				else
+					pos=r[0].to_s.to_i
+					case r[1]
+					when Gtk::TreeView::DROP_AFTER, Gtk::TreeView::DROP_INTO_OR_AFTER
+						pos+=1
+					end
+					list_add_at(@tree_selection, @config['extension'], pos)
+				end
+			when DragType::URI_LIST
+				r=@list_view.get_dest_row(x, y)
+				if r.nil?
+					list_add_uris(data.uris, @config['extension'])
+				else
+					pos=r[0].to_s.to_i
+					case r[1]
+					when Gtk::TreeView::DROP_AFTER, Gtk::TreeView::DROP_INTO_OR_AFTER
+						pos+=1
+					end
+					list_add_uris_at(data.uris, @config['extension'], pos)
+				end
+			end
+		}
+
+#Context menu
+		@badd_list=Gtk::ImageMenuItem.new(Gtk::Stock::ADD)
+		@badd_list.signal_connect("activate"){import_list}
+		@brm_list=Gtk::ImageMenuItem.new(Gtk::Stock::REMOVE)
+		@bedit_list=Gtk::ImageMenuItem.new(Gtk::Stock::EDIT)
+		@bedit_list.signal_connect("activate"){list_edit}
+		@bsave_list=Gtk::ImageMenuItem.new(Gtk::Stock::SAVE)
+		@bsave_list.signal_connect("activate"){list_save}
+		@brm_list.signal_connect("activate"){list_rm(@list_selection)}
+		sep=Gtk::SeparatorMenuItem.new
+		@bedit2_list=Gtk::ImageMenuItem.new(_('Edit tag'))
+		@bedit2_list.image=Gtk::Image.new(Gtk::Stock::EDIT, Gtk::IconSize::MENU)
+		@bedit2_list.signal_connect("activate"){
+			s=@list_selection.selected_rows
+			unless s.empty?
+				i=s[-1].to_s.to_i
+				EditSongWindow.new(@playlist.songs[i], self, @config['name_format'])
+			end
+		}
+		@bopen=Gtk::ImageMenuItem.new(Gtk::Stock::OPEN)
+		@bopen.signal_connect("activate"){
+			s=@list_selection.selected_rows
+			unless s.empty?
+				i=s[-1].to_s.to_i
+				dir=File.dirname(@playlist.songs[i].path)
+				dir.gsub!(/(?=[{\[\ \]}*])/, '\\')#gsub(/(?=[{\[\]}*])/, '\\') -> escape { [ ] } *
+				ErrorError.new("Cannot open #{dir}", true) unless system("gnome-open #{dir}")
+			end
+		}
+
+		@cm_list=Gtk::Menu.new
+		[@badd_list, @brm_list, @bedit_list, @bsave_list, sep, @bedit2_list, @bopen].each{|b| @cm_list.append(b)}
+
+		@cm_list.show_all
+
+#*********************Cd zone**********************************
+		if $cd
+			@wcd=Cd::Window.new(@config, @cdlist)
+			@wcd.view.signal_connect("row-activated"){|view, path, column|
+				@cdlist.current=path.to_s.to_i
+				stop
+				play
+			}
+			
+			@bcdrefresh=Gtk::Button.new
+			@bcdrefresh.image=Gtk::Image.new(Gtk::Stock::REFRESH, Gtk::IconSize::BUTTON)
+			@bcdrefresh.signal_connect('clicked'){@cdlist.refresh; @wcd.refresh_store}##{Thread.new($stdout){@list.refresh_on;refresh_store}}
+			@bcdpreference=Gtk::Button.new
+			@bcdpreference.image=Gtk::Image.new(Gtk::Stock::PREFERENCES, Gtk::IconSize::BUTTON)
+			@bcdpreference.signal_connect('clicked'){
+				Preference_window.show(self, @playlist, @config, :cd, @cdlist, @cdplayer, @wcd)
+			}
+			
+			@cdtable=Gtk::Table.new(4,2)
+			@cdtable.column_spacings=($border)
+			@cdtable.attach(@bcdrefresh, 0, 1, 1, 2, Gtk::SHRINK, Gtk::SHRINK)
+			@cdtable.attach(@bcdpreference, 0, 1, 2, 3, Gtk::SHRINK, Gtk::SHRINK)
+			@cdtable.attach(@wcd, 1, 2, 0, 4)
+		end
+		
+#*********************Radio zone*******************************
+		if $radio
+			@wradio=Radio::Window.new(self, @radiolist)
+			@wradio.view.signal_connect("row-activated"){|view, path, column|
+				@radiolist.current=path.to_s.to_i
+				stop
+				play
+			}
+			
+			@bradioadd=Gtk::Button.new
+			@bradioadd.image=Gtk::Image.new(Gtk::Stock::ADD, Gtk::IconSize::BUTTON)
+			@bradioadd.tooltip_text=_('Add a radio')
+			@bradioadd.signal_connect('clicked'){@wradio.add_radio}
+			@bradiorm=Gtk::Button.new
+			@bradiorm.image=Gtk::Image.new(Gtk::Stock::REMOVE, Gtk::IconSize::BUTTON)
+			@bradiorm.tooltip_text=_('Remove selection')
+			@bradiorm.signal_connect('clicked'){
+				current_removed=@wradio.rm
+				if @active_view=='radio'
+					@radioplayer.stop if current_removed
+				end
+			}
+			@bradioclear=Gtk::Button.new
+			@bradioclear.image=Gtk::Image.new(Gtk::Stock::CLEAR, Gtk::IconSize::BUTTON)
+			@bradioclear.tooltip_text=_('Clear radios list')
+			@bradioclear.signal_connect('clicked'){
+				@radioplayer.stop
+				@wradio.clear
+			}
+			
+			@bradioedit=Gtk::Button.new
+			@bradioedit.image=Gtk::Image.new(Gtk::Stock::EDIT, Gtk::IconSize::BUTTON)
+			@bradioedit.tooltip_text=_('Edit a radio')
+			@bradioedit.signal_connect('clicked'){radios_edit}
+
+			@radiotable=Gtk::Table.new(6,2)
+			@radiotable.column_spacings=($border)
+			@radiotable.attach(@bradioadd, 0, 1, 1, 2, Gtk::SHRINK, Gtk::SHRINK)
+			@radiotable.attach(@bradiorm, 0, 1, 2, 3, Gtk::SHRINK, Gtk::SHRINK)
+			@radiotable.attach(@bradioclear, 0, 1, 3, 4, Gtk::SHRINK, Gtk::SHRINK)
+			@radiotable.attach(@bradioedit, 0, 1, 4, 5, Gtk::SHRINK, Gtk::SHRINK)
+			@radiotable.attach(@wradio, 1, 2, 0, 6)
+		end
+		
+#*********************Player zone******************************
+#View selection
+	#@icon_theme=Gtk::IconTheme.default
+		#@idir=@icon_theme.load_icon('gtk-directory', Gtk::IconSize::BUTTON, Gtk::IconTheme::LOOKUP_FORCE_SVG)
+		@viewstore=Gtk::ListStore.new(Gdk::Pixbuf)
+		['sound_directory.svg','sound.svg','gtk-directory.svg','player_play.svg'].each{|image|
+			child=@viewstore.append
+			child[0]=Gdk::Pixbuf.new(File.join(Pix_dir, image), 24, 24)
+		}
+		if $cd
+			child=@viewstore.append
+			child[0]=Gdk::Pixbuf.new(File.join(Pix_dir, 'media-cdrom.svg'), 24, 24)
+		end
+		if $radio
+			child=@viewstore.append
+			child[0]=Gdk::Pixbuf.new(File.join(Pix_dir, 'network-wireless.svg'), 24, 24)
+		end
+		@renderer3=Gtk::CellRendererPixbuf.new
+		@selectview=Gtk::ComboBox.new(false)
+		@selectview.model=@viewstore
+		@selectview.pack_start(@renderer3,false)
+		@selectview.set_attributes(@renderer3, :pixbuf => 0)
+		
+		case @config['view']
+			when 'playlist' then @selectview.active=View::PLAYLIST
+			when 'browser' then @selectview.active=View::BROWSER
+			when 'player' then @selectview.active=View::COMPACT
+			when 'cd' then  @selectview.active=View::CD
+			when 'radio' then  @selectview.active=View::RADIO
+			else @selectview.active=View::ALL
+		end
+		@selectview.signal_connect('changed'){change_view}
+#Song title
+		@song_title=Gtk::Label.new
+		@song_title.wrap=true
+		@song_title.attributes=Pango::AttrList.new.insert(Pango::AttrWeight.new(Pango::WEIGHT_BOLD))
+		@fsong_title=Gtk::Frame.new
+		@fsong_title.add(@song_title)
+#volume		
+		@bvolume=Gtk::VolumeButton.new
+		@bvolume.value=@player.volume
+		@bvolume.signal_connect('value-changed'){
+			@player.volume=@bvolume.value
+			@cdplayer.volume=@bvolume.value if $cd
+			@radioplayer.volume=@bvolume.value if $radio
+		}
+		
+#buttons
+		@iprev=Gtk::Image.new(Gtk::Stock::MEDIA_PREVIOUS,Gtk::IconSize::BUTTON)
+		@bprev= Gtk::Button.new;@bprev.image=@iprev
+		@bprev.signal_connect('clicked'){previous_song}
+		@istop=Gtk::Image.new(Gtk::Stock::MEDIA_STOP,Gtk::IconSize::BUTTON)
+		@bstop=Gtk::Button.new;@bstop.image=@istop
+		@bstop.signal_connect('clicked'){stop}
+		@iplay=Gtk::Image.new(Gtk::Stock::MEDIA_PLAY,Gtk::IconSize::BUTTON)
+		@bplay= Gtk::Button.new;@bplay.image=@iplay
+		@bplay.signal_connect('clicked'){play}
+		@ipause=Gtk::Image.new(Gtk::Stock::MEDIA_PAUSE,Gtk::IconSize::BUTTON)
+		@bpause=Gtk::Button.new;@bpause.image=@ipause
+		@bpause.signal_connect('clicked'){pause}
+		@inext=Gtk::Image.new(Gtk::Stock::MEDIA_NEXT,Gtk::IconSize::BUTTON)
+		@bnext= Gtk::Button.new;@bnext.image=@inext
+		@bnext.signal_connect('clicked'){next_song}
+#time
+		@lposition=Gtk::Label.new('--:--')
+		@lposbox=Gtk::EventBox.new
+		@lposbox.events=Gdk::Event::BUTTON_PRESS_MASK
+		@lposbox.add(@lposition)
+		@lposbox.signal_connect('button_press_event'){|widget, event|
+			if event.button==1
+				@config['remaining_time']=!@config['remaining_time']
+			end
+		}
+		@sposition=Gtk::HScale.new
+		@sposition.draw_value=false
+		@sposition.signal_connect('button_press_event'){@seeking=true;false}
+		@sposition.signal_connect('button_release_event'){
+			case active_player
+			when 'default'
+				player=@player
+			when 'cd'
+				player=@cdplayer
+			when 'radio'
+				player=nil
+			end
+			player.position=@sposition.value.to_i if player
+			@seeking=false
+		}
+		@lduration=Gtk::Label.new('--:--')
+#containers
+		@title_container=Gtk::HBox.new(false)
+		@title_container.pack_start(@selectview, false, false)
+		@title_container.pack_start(@fsong_title, true, true)
+		@title_container.pack_start(@bvolume, false, false)
+				
+		@button_container=Gtk::HBox.new(false)
+		@button_container.pack_start(@bprev, false, false)
+		@button_container.pack_start(@bstop, false, false)
+		@button_container.pack_start(@bplay, false, false)
+		@button_container.pack_start(@bpause, false, false)
+		@button_container.pack_start(@bnext, false, false)
+		@button_container.pack_start(@lposbox, false, false)
+		@button_container.pack_start(@sposition, true, true)
+		@button_container.pack_start(@lduration, false, false)
+		
+#**********************Key bindings***************************
+		@accel=Gtk::AccelGroup.new
+		@accel.connect(Gdk::Keyval::GDK_KEY_p, Gdk::Window::CONTROL_MASK,Gtk::ACCEL_VISIBLE){playpause}
+		@accel.connect(Gdk::Keyval::GDK_KEY_s, Gdk::Window::CONTROL_MASK,Gtk::ACCEL_VISIBLE){stop}
+		@accel.connect(Gdk::Keyval::GDK_KEY_b, Gdk::Window::CONTROL_MASK,Gtk::ACCEL_VISIBLE){previous_song}
+		@accel.connect(Gdk::Keyval::GDK_KEY_n, Gdk::Window::CONTROL_MASK,Gtk::ACCEL_VISIBLE){next_song}
+		@accel.connect(Gdk::Keyval::GDK_KEY_Down, Gdk::Window::CONTROL_MASK,Gtk::ACCEL_VISIBLE){volume_down}
+		@accel.connect(Gdk::Keyval::GDK_KEY_Up, Gdk::Window::CONTROL_MASK,Gtk::ACCEL_VISIBLE){volume_up}
+		@accel.connect(Gdk::Keyval::GDK_KEY_f, Gdk::Window::CONTROL_MASK,Gtk::ACCEL_VISIBLE){
+			@editing ? @edit_wrapper.search : search
+		}
+		@accel.connect(Gdk::Keyval::GDK_KEY_d, Gdk::Window::CONTROL_MASK,Gtk::ACCEL_VISIBLE){focus_to_current}
+		@accel.connect(Gdk::Keyval::GDK_KEY_F1, nil, Gtk::ACCEL_VISIBLE){help}
+		@accel.connect(Gdk::Keyval::GDK_KEY_Delete, nil, Gtk::ACCEL_VISIBLE){
+			list_rm(@list_selection) if @list_view.has_focus?
+			if @edit_wrapper
+				@edit_wrapper.rm_song if @edit_wrapper.has_focus?
+			end
+		}
+
+#*********************Main window******************************
+		@table=Gtk::Table.new(8, 2)
+		@table.column_spacings=($border)
+		@table.attach(@badd, 0, 1, 2, 3, Gtk::SHRINK, Gtk::SHRINK)
+		@table.attach(@brm, 0, 1, 3, 4, Gtk::SHRINK, Gtk::SHRINK)
+		@table.attach(@bclear, 0, 1, 4, 5, Gtk::SHRINK, Gtk::SHRINK)
+		@table.attach(@bedit, 0, 1, 5, 6, Gtk::SHRINK, Gtk::SHRINK)
+		@table.attach(@bfind, 0, 1, 6, 7, Gtk::SHRINK, Gtk::SHRINK)
+		@table.attach(@wlist, 1, 2, 1, 8)
+		
+		@paned=Gtk::HPaned.new
+		@paned.position=@config['paned_position']
+		@paned.add1(@wtree)
+		@paned.add2(@table)
+		
+		@vbox=Gtk::VBox.new
+		@vbox.pack_start(@menu_bar, false, false, 0)
+		@vbox.pack_start(@paned)
+		@vbox.pack_start(@cdtable) if $cd
+		@vbox.pack_start(@radiotable) if $radio
+		@vbox.pack_start(@title_container, false, false)
+		@vbox.pack_start(@button_container, false, false)
+		
+		super()
+		self.signal_connect("delete_event") {quit; false}
+		self.title=$name
+		@icon_Z=Gdk::Pixbuf.new(File.join(Pix_dir,'ZiK.svg'))
+		self.icon=(@icon_Z)
+		self.add_accel_group(@accel)
+		
+		self.resize(@config['width'],@config['height'])
+		self.move(@config['x'],@config['y'])
+		
+		self.add(@vbox)
+		
+		@vbox.show_all
+		change_view
+		self.show
+	end
+
+private
+	
+	def change_view
+		case @selectview.active
+			when View::ALL
+				@paned.show; @paned.child1.show; @paned.child2.show
+				@badd.sensitive=true
+				@playlist_it.show; @broswe_it.show
+				@cdtable.hide if $cd
+				@radiotable.hide if $radio
+				@radiolist_it.hide if $radio
+				self.resize(self.size[0],@config['height']) if @config['view']=='player'
+				@config['view']='all'
+				@active_view='default'
+			when View::PLAYLIST
+				@paned.show; @paned.child1.hide; @paned.child2.show
+				@badd.sensitive=false
+				@playlist_it.show; @broswe_it.hide
+				@cdtable.hide if $cd
+				@radiotable.hide if $radio
+				@radiolist_it.hide if $radio
+				self.resize(self.size[0],@config['height']) if @config['view']=='player'
+				@config['view']='playlist'
+				@active_view='default'
+			when View::BROWSER
+				@paned.show; @paned.child1.show; @paned.child2.hide
+				@playlist_it.hide; @broswe_it.show
+				@cdtable.hide if $cd
+				@radiotable.hide if $radio
+				@radiolist_it.hide if $radio
+				self.resize(self.size[0],@config['height']) if @config['view']=='player'
+				@config['view']='browser'
+				@active_view='default'
+			when View::COMPACT
+				@paned.hide
+				@playlist_it.hide; @broswe_it.hide
+				@cdtable.hide if $cd
+				@radiotable.hide if $radio
+				@radiolist_it.hide if $radio
+				s=self.size; self.resize(s[0],1)
+				@config['height']=s[1]
+				@config['view']='player'
+			when View::CD
+				@paned.hide; @cdtable.show
+				@playlist_it.hide; @broswe_it.hide
+				@radiotable.hide if $radio
+				@radiolist_it.hide if $radio
+				self.resize(self.size[0],@config['height']) if @config['view']=='player'
+				@config['view']='cd'
+				@active_view='cd'
+			when View::RADIO
+				@paned.hide
+				@playlist_it.hide; @broswe_it.hide
+				@radiotable.show
+				@radiolist_it.show
+				@cdtable.hide if $cd
+				self.resize(self.size[0],@config['height']) if @config['view']=='player'
+				@config['view']='radio'
+				@active_view='radio'
+		end
+	end
+
+public
+	
+	def quit
+		pos=self.position;@config['x']=pos[0];@config['y']=pos[1]
+		s=self.size;@config['width']=s[0];@config['height']=s[1] unless @selectview.active==View::COMPACT
+		@config['paned_position']=@paned.position
+		
+		Gtk.main_quit
+	end
+	
+	def play(player_wanted=@active_view)
+		case player_wanted
+		when 'default'
+			if $cd
+				@cdplayer.stop if @cdplayer.playing?
+			end
+			if $radio
+				@radioplayer.stop if @radioplayer.playing?
+			end
+			playlist=@playlist
+			song=@playlist.songs[@playlist.current]
+			player=@player
+			store=@list_store
+		when 'cd'
+			@player.stop if @player.playing?
+			if $radio
+				@radioplayer.stop if @radioplayer.playing?
+			end
+			playlist=@cdlist
+			song=@cdlist.songs[@cdlist.current]
+			player=@cdplayer
+			store=@wcd.store
+		when 'radio'
+			@player.stop if @player.playing?
+			if $cd
+				@cdplayer.stop if @cdplayer.playing?
+			end
+			playlist=@radiolist
+			song=@radiolist.radios[@radiolist.current]
+			player=@radioplayer
+			store=@wradio.store
+		end
+		
+		if song.nil?
+			ErrorError.new("Song n°#{playlist.current} do not exists.")
+		else
+			player.play(song)
+			self.signal_emit('play', song)
+			@song_title.text="#{song.name}"
+			duration=song.duration
+			if duration <= 0
+				@lduration.text='--:--'
+				@sposition.set_range(0,1200)#Use 20 minutes if song's duration is not known.
+				GLib::Timeout.add(600){get_gst_duration(player, song)}#if taglib cannot give the track duration, let's try GStreamer
+			elsif duration < 3600
+				@lduration.text=Time.at(duration).strftime("%M:%S")
+				@sposition.set_range(0,duration)
+			else
+				@lduration.text=(duration.to_i/3600).to_s+":"+Time.at(duration).strftime("%M:%S")
+				@sposition.set_range(0,duration)
+			end
+			store.each{|model, path, iter|
+				if path.to_s.to_i==playlist.current
+					iter[1]=true
+				else
+					iter[1]=false
+				end
+			}
+			nb_timeout=@nb_timeout+=1
+			GLib::Timeout.add(400){
+				position=player.position
+				if position <= 0
+					@lposition.text="--:--"
+				else
+					duration=song.duration#get an uptodate duration
+					if duration <= 0
+						@lposition.text=Time.at(position).strftime("%M:%S")
+					elsif duration < 3600
+						if @config['remaining_time']
+							t=duration-position; format="-%M:%S"
+						else
+							t=position; format="%M:%S"
+						end
+						@lposition.text=Time.at(t).strftime(format)
+					else
+						if @config['remaining_time']
+							t=duration-position
+							format="-"
+						else
+							t=position
+							format=""
+						end
+						@lposition.text=format+(t.to_i/3600).to_s+":"+Time.at(t).strftime("%M:%S")
+					end
+				end
+				@sposition.value=position unless @seeking
+				player.playing? && @nb_timeout==nb_timeout
+			}
+			if player_wanted=='radio'
+				@bprev.sensitive=false
+				@bnext.sensitive=false
+			else
+				@bprev.sensitive=true
+				@bnext.sensitive=true
+			end
+		end
+	end
+
+private
+
+	def get_gst_duration(player, song, tryagain=true)
+		duration=player.duration
+		if duration>0
+			song.duration=duration
+			if duration < 3600
+				@lduration.text=Time.at(duration).strftime("%M:%S")
+			else
+				@lduration.text=(duration.to_i/3600).to_s+":"+Time.at(duration).strftime("%M:%S")
+			end
+			@sposition.set_range(0,duration)
+		else
+			GLib::Timeout.add(4000){get_gst_duration(player, song, false)} if tryagain
+		end
+		false
+	end
+
+public
+
+	def stop
+		@player.stop
+		@cdplayer.stop if $cd
+		@radioplayer.stop if $radio
+		self.signal_emit('stop')
+	end
+	
+	def pause
+		@player.pause
+		if $cd
+			@cdplayer.pause
+		end
+		if $radio
+			@radioplayer.pause
+		end
+	end
+
+	def active_player
+		active_player=nil
+		active_player='default' if @player.playing?
+		active_player='cd' if $cd&&@cdplayer.playing?
+		active_player='radio' if $radio&&@radioplayer.playing?
+		active_player=@active_view unless active_player
+		active_player
+	end
+
+	def playing?
+		return true if @player.playing?
+		return true if $cd&&@cdplayer.playing?
+		return true if $radio&&@radioplayer.playing?
+		false
+	end
+
+	def playpause
+		playing? ? pause : play
+	end
+
+	def previous_song
+		player=active_player
+		case player
+		when 'default'
+			playlist=@playlist
+		when 'cd'
+			playlist=@cdlist
+		when 'radio'
+			return
+		end
+		if playlist.previous_song
+			stop
+			play(player)
+		else
+			ErrorInfo.new("Begining of the playlist.")
+		end
+	end
+	
+	def next_song
+		player=active_player
+		case player
+		when 'default'
+			playlist=@playlist
+		when 'cd'
+			playlist=@cdlist
+		when 'radio'
+			return
+		end
+		if playlist.next_song
+			stop
+			play(player)
+		else
+			ErrorInfo.new("End of the playlist.")
+		end
+	end
+
+	def next_song_on_error
+		unless @first_song_error
+			@first_song_error=@playlist.current
+			next_song
+		else
+			if @playlist.current==@first_song_error
+				ErrorError.new("All tracks seems to be inaccessible.")
+			else
+				next_song
+			end
+		end
+	end
+
+	def update_gst_registry
+		label=Gtk::Label.new(_("Loading new plugins. Please wait..."))
+		window=Gtk::Window.new
+		window.modal=true
+		window.transient_for=self
+		window.signal_connect("delete_event") {true}
+		window.add(label)
+		window.show_all
+		stop
+		Gst::Registry.update
+		window.destroy
+		play
+	end
+
+	def volume_up
+		inc=@bvolume.adjustment.page_increment
+		if @bvolume.value>1-inc
+			@bvolume.value=1
+		else
+			@bvolume.value+=inc
+		end
+	end
+	
+	def volume_down
+		inc=@bvolume.adjustment.page_increment
+		if @bvolume.value<inc
+			@bvolume.value=0
+		else
+			@bvolume.value-=inc
+		end
+	end
+	
+	def shuffle=(tf)
+		@config['shuffle']=tf
+		@shuffle_it.active=tf
+		@playlist.shuffle=tf
+		@cdlist.shuffle=tf if $cd
+	end
+
+	def repeat=(tf)
+		@config['repeat']=tf
+		@repeat_it.active=tf
+		@playlist.repeat=tf
+		@cdlist.repeat=tf if $cd
+	end
+
+	def refresh_treestore(directories, extension, start=false)
+		ErrorInfo.new('Refreshing tree view...')
+		self.cursor=Gdk::Cursor::WATCH
+
+		backup=File.join(User_dir,'tree')
+		unless File.exist?(backup)
+			Dir.mkdir(backup) if $saveconfig
+		end
+		BrowseSearchWindow.refresh
+		@treestore.clear
+
+		rexp=Regexp.new('.*\.('+extension.gsub(',','|')+')$', Regexp::IGNORECASE)
+		directories.split(',').each_with_index{|directory, nb|
+			if File.directory?(directory)
+				
+				fback=File.join(backup, nb.to_s)
+				if (not @config['refresh_on_start'] and File.readable?(fback) and start)
+					#Read the list of files
+					f=File.open(fback,'r')
+					files=f.readlines
+					f.close
+				else
+					#List all music files
+					files=[]
+					Find.find(directory){|f| files.push(f) if f=~rexp}
+					@config['sort_case_sensitive'] ? files.sort! : files=files.sort_by{|f| f.downcase}
+					if $saveconfig
+						if @config['refresh_on_start']
+							#Delete list
+							ff=Dir.glob(File.join(backup,'*'))
+							File.delete(*ff)
+						else
+							#Save the list
+							f=File.open(fback,'w')
+							f.puts files
+							f.close
+						end
+					end
+				end
+
+				#Add root directory
+				root=@treestore.append(nil)
+				root[0]=directory;root[1]=directory
+				hiter={directory=>root}
+
+				if @config['sort_directories_first']
+					files.each{|file|
+						dirname=File.dirname(file)
+						refresh_treestore_dirs(hiter, dirname)
+					}
+					files.each{|file|
+						ext=File.extname(file);name=File.basename(file,ext);dirname=File.dirname(file)
+						refresh_treestore_file(file, name, hiter[dirname])
+					}
+				else
+					files.each{|file|
+						ext=File.extname(file);name=File.basename(file,ext);dirname=File.dirname(file)
+						refresh_treestore_dirs(hiter, dirname)#Create directories from root directory to file
+						refresh_treestore_file(file, name, hiter[dirname])#Add file
+					}
+				end
+			else
+				printf("#{directory} is not a directory...")
+			end
+		}
+		self.cursor=Gdk::Cursor::ARROW
+		ErrorInfo.new('Refreshing done.')
+	end
+	
+private
+
+	def refresh_treestore_dirs(hiter, dir)
+		dirs=[]
+		until ancestor=hiter[dir]
+			dirs.push(dir)
+			dir=File.expand_path(File.join(dir,'..'))
+		end
+		dirs.reverse!.each{|dir|
+			child=@treestore.append(hiter[File.expand_path(File.join(dir,'..'))])
+			child[0]=File.basename(dir);child[1]=dir
+			hiter[dir]=child
+		}
+	end
+
+	def refresh_treestore_file(file, name, iter)
+		child=@treestore.append(iter)
+		child[0]=name;child[1]=file
+	end
+
+public
+
+	def compact(tf, scale_factor=0.7)
+#Must be called at initialization time (to set @hcompact)
+		@hcompact={:weight=>@renderer2.weight, :ypad=>@renderer2.ypad,
+			:spacing=>@col2.spacing} unless @hcompact
+		if tf
+			@renderer2.scale=scale_factor
+			@renderer2.weight=@hcompact[:weight]/(scale_factor**0.5)
+			@renderer2.ypad=0
+			@col2.spacing=0
+		else
+			@renderer2.scale=1
+			@renderer2.weight=@hcompact[:weight]
+			@renderer2.ypad=@hcompact[:ypad]
+			@col2.spacing=@hcompact[:spacing]
+		end
+		@col2.queue_resize
+	end
+
+	def refresh_liststore
+		@list_store.clear
+		i=0
+		@playlist.songs.each{|song|
+			child=@list_store.append
+			child[0]=song.name
+			@playlist.current==i ? child[1]=true : child[1]=false
+			i+=1
+		}
+		if active_player=='default'&&!@song_title.nil?#@song_title is not defined when Gui object is created
+			song=@playlist.songs[@playlist.current]
+			@song_title.text="#{song.name}" unless song.nil?
+		end
+	end
+
+	def focus_to_current
+		@list_view.scroll_to_cell(Gtk::TreePath.new(@playlist.current.to_s), nil, true, 0.5, 0.5)
+	end
+
+	def search(songs=@playlist.songs, selection=@list_selection, view=@list_view)
+		proc=Proc.new{
+			@wsearch=ListSearchWidget.new(songs, selection, view)
+			if @editing
+				@table.attach(@wsearch, 2, 8, 0, 1, Gtk::FILL, Gtk::SHRINK)
+			else
+				@table.attach(@wsearch, 1, 2, 0, 1, Gtk::FILL, Gtk::SHRINK)
+			end
+		}
+		unless @wsearch
+			proc.call
+		else
+			proc.call if @wsearch.destroyed?
+		end
+		@wsearch.focus
+	end
+	
+	def refresh_playlist(new,force=false)
+		unless new.songs==@playlist.songs
+			if new.empty?
+				@playlist.clear
+			else
+				@playlist.change_to(new)
+				force=true
+			end
+		end
+		refresh_liststore if force
+	end
+
+	def import_list
+		dialog=Gtk::FileChooserDialog.new(_("Import a file"), self,
+			Gtk::FileChooser::ACTION_OPEN, nil,
+			[Gtk::Stock::CANCEL, Gtk::Dialog::RESPONSE_CANCEL], [Gtk::Stock::OPEN, Gtk::Dialog::RESPONSE_ACCEPT])
+		dialog.select_multiple=true
+		dialog.show_hidden=false
+		filter=Gtk::FileFilter.new
+		filter.add_pattern('*.xspf');filter.add_pattern('*.m3u');filter.add_pattern('*.pls')
+		filter.add_mime_type('audio/*')
+		dialog.filter=filter
+		if dialog.run==Gtk::Dialog::RESPONSE_ACCEPT
+			dialog.filenames.each{|file| @playlist.add(file, @config['extension'])}
+			refresh_liststore
+		end
+		dialog.destroy
+	end
+	
+	def list_save
+		dialog=Gtk::FileChooserDialog.new(_("Save playlist"), self,
+			Gtk::FileChooser::ACTION_SAVE, nil,
+			[Gtk::Stock::CANCEL, Gtk::Dialog::RESPONSE_CANCEL], [Gtk::Stock::OPEN, Gtk::Dialog::RESPONSE_ACCEPT])
+		dialog.do_overwrite_confirmation=true
+		dialog.filter=Gtk::FileFilter.new.add_pattern('*.m3u').add_pattern('*.xspf')
+		dialog.show_hidden=false
+		if dialog.run==Gtk::Dialog::RESPONSE_ACCEPT
+			f=dialog.filename
+			case
+			when f=~/.*\.xspf$/i
+				@playlist.save_xspf(f, @config['relative_playlist'])
+			when f=~/.*\.m3u$/i
+				@playlist.save_m3u(f, @config['relative_playlist'])
+			else
+				@playlist.save_m3u(f+'.m3u', @config['relative_playlist'])
+			end
+		end
+		dialog.destroy
+	end
+
+	def export_songs
+		dialog=Gtk::FileChooserDialog.new(_("Export songs"), self,
+			Gtk::FileChooser::ACTION_SAVE, nil,
+			[Gtk::Stock::CANCEL, Gtk::Dialog::RESPONSE_CANCEL],
+			[Gtk::Stock::OPEN, Gtk::Dialog::RESPONSE_ACCEPT])
+		dialog.do_overwrite_confirmation=true
+		dialog.filter=Gtk::FileFilter.new.add_pattern('*.m3u').add_pattern('*.xspf')
+		b=Gtk::RadioButton.new(_("Export all songs in this directory.")).show
+		Gtk::RadioButton.new(b, _("Recreate songs tree under the destination directory.")).show
+		dialog.extra_widget=hpack(b.group)
+		if dialog.run==Gtk::Dialog::RESPONSE_ACCEPT
+			f=dialog.filename
+			if b.active?
+				@exportlist=ExportList.new(@playlist.songs, f)
+			else
+				@exportlist=ExportList.new(@playlist.songs, f, @config['directory'])
+			end
+			@exportlist.write_plalist
+			ErrorInfo.new('Copying audio files...')
+			nb=@exportlist.nb.to_f
+			wprogress=ProgressWindow.new(_("Copying audio files..."), self)
+			wprogress.text="0/"+"#{nb.to_i}"
+			require 'thread'; queue=Queue.new
+			@exportlist.export(queue)
+			GLib::Timeout.add_seconds(1){
+				li=nil; error=nil
+				until queue.empty?
+					case o=queue.pop
+					when Fixnum
+						li=o
+					else
+						error=o
+						break
+					end
+				end
+				if li
+					wprogress.fraction=(li+1)/nb
+					wprogress.text="#{(li+1)}"+"/"+"#{nb.to_i}"
+				end
+				if error
+					wprogress.destroy
+					if error.kind_of?(ErrorsStock)
+						o.show_all(n_("An error occured while exporting songs.\n",
+							"Some errors occured while exporting songs.\n", o.nb))
+					else
+						ErrorError.new(
+_("An error occured while exporting songs.\nUnknown queued object type (#{o.class})."), true)
+					end
+					false
+				else
+					true
+				end
+			}
+		end
+		dialog.destroy
+	end
+
+	def abort_export_songs
+		@exportlist.abort_export
+	end
+
+	def list_add(selection, extension)
+		selection.selected_each{|model, path, iter| @playlist.add(iter[1], extension)}
+		refresh_liststore
+	end
+	
+	def list_add_at(selection, extension, position)
+		elist=Editlist.new([], @config['name_format'])
+		selection.selected_each{|model, path, iter| elist.add(iter[1], extension)}
+		elist.merge(@playlist, position)
+		@playlist.change_to(elist)
+		refresh_liststore
+	end
+	
+	def list_add_uris(uris, extension)
+		uris.each{|uri| @playlist.add(GLib.filename_from_uri(uri)[0], extension)}
+		refresh_liststore
+	end
+	
+	def list_add_uris_at(uris, extension, position)
+		elist=Editlist.new([], @config['name_format'])
+		uris.each{|uri| elist.add(GLib.filename_from_uri(uri)[0], extension)}
+		elist.merge(@playlist, position)
+		@playlist.change_to(elist)
+		refresh_liststore
+	end
+	
+	def list_rm(selection)
+		i=[]
+		selection.selected_each{|model, path, iter| i.push(path.to_s.to_i)}
+		i=i.sort {|x,y| y<=> x}
+		i.each{|num|
+			current_removed=@playlist.rm(num)
+			@player.stop if current_removed
+		}
+		refresh_liststore
+	end
+	
+	def list_clear
+		@player.stop
+		@playlist.clear
+		refresh_liststore
+	end
+	
+	def list_edit
+		@editing=true
+		begin; @wsearch.destroy; rescue; end
+		elist=Editlist.new(@playlist.songs, @config['name_format'])
+		@edit_wrapper=EditListWrapper.new(self, elist, @config)
+		bcancel=Gtk::Button.new(Gtk::Stock::CANCEL)
+		bok=Gtk::Button.new(Gtk::Stock::OK)
+		pquit=Proc.new{
+			@bedit.sensitive=true
+			@wlist.show
+			@edit_wrapper.destroy
+			bcancel.destroy
+			bok.destroy
+			begin; @wsearch.destroy; rescue; end
+			@playlist_it.set_submenu(@playlist_menu)
+			@table.resize(8, 2)
+			@editing=false
+		}
+		pcancel=Proc.new{
+			if @edit_wrapper.force_refresh_parent
+				@edit_wrapper.refresh_list
+				refresh_liststore
+			end
+		}
+		pok=Proc.new{
+			@edit_wrapper.refresh_list
+			refresh_playlist(@edit_wrapper.list, @edit_wrapper.force_refresh_parent)
+		}
+		bcancel.signal_connect('clicked'){
+			pcancel.call
+			pquit.call
+		}
+		bcancel.show
+		bok.signal_connect('clicked'){
+			pok.call
+			pquit.call
+		}
+		bok.show
+		cancel_it=Gtk::ImageMenuItem.new(Gtk::Stock::CANCEL)
+		cancel_it.signal_connect('activate'){pcancel.call; pquit.call}
+		ok_it=Gtk::ImageMenuItem.new(Gtk::Stock::OK)
+		ok_it.signal_connect('activate'){pok.call; pquit.call}
+		playlist_menu=Gtk::Menu.new
+		playlist_menu.append(cancel_it)
+		playlist_menu.append(ok_it)
+		playlist_menu.show_all
+		@playlist_it.set_submenu(playlist_menu)
+		@table.attach(@edit_wrapper.table, 2, 8, 1, 8)
+		@table.attach(@edit_wrapper.badd, 3, 4, 8, 9, Gtk::SHRINK, Gtk::SHRINK)
+		@table.attach(@edit_wrapper.bsave, 4, 5, 8, 9, Gtk::SHRINK, Gtk::SHRINK)
+		@table.attach(bcancel, 6, 7, 8, 9, Gtk::SHRINK, Gtk::SHRINK)
+		@table.attach(bok, 7, 8, 8, 9, Gtk::SHRINK, Gtk::SHRINK)
+		@bedit.sensitive=false
+		@wlist.hide
+		dialog=Gtk::MessageDialog.new(self, Gtk::Dialog::MODAL, Gtk::MessageDialog::INFO,
+			Gtk::MessageDialog::BUTTONS_CLOSE,
+			_("Do not forget to validate your changes after editing the playlist."))
+		dialog.run; dialog.destroy
+	end
+
+if $radio
+	def radios_edit
+		elist=Radio::EditList.new(@radiolist.radios)
+		Radio::Edit.new(self, elist, @wradio)
+	end
+
+	def refresh_radiolist(new, force)
+		unless new.radios==@radiolist.radios
+			if new.radios.empty?
+				@radiolist.clear
+			else
+				@radiolist.change_to(new)
+				force=true
+			end
+		end
+		@wradio.refresh_store if force
+	end
+end
+
+	def cursor=(c)
+		self.window.cursor=Gdk::Cursor.new(c)
+	end
+
+	def help
+		case ENV['LANG']
+		when /^fr/i then index='html/fr/index.html'
+		else index='html/index.html'
+		end
+		unless system("gnome-open #{File.join(Doc_dir,index)}")
+			ErrorError.new(_("Cannot open #{File.join(Doc_dir,index)}"), true)
+			unless index=='html/index.html'
+				unless system("gnome-open #{File.join(Doc_dir,'html/index.html')}")
+					ErrorError.new(_("Cannot open #{File.join(Doc_dir,'html/index.html')}"), true)
+				end
+			end
+		end
+	end
+	
+	def about
+		begin
+			f=File.open(File.join(Doc_dir,'COPYING'))
+			copying=''
+			while line=f.gets
+				copying+=line
+			end
+		rescue
+			copying="Error: license file was not found.\n
+				The GNU General Public License, version 2 can be found at:\nhttp://www.gnu.org/licenses/gpl-2.0.html"
+		ensure
+			f.close	unless f.nil?
+		end
+		authors=["Vincent Carmona <vinc4mai@gmail.com>"]
+		if $module
+			3.times{authors.push("")}; authors.push("Modules"); authors.push("")
+			Mod.all.each{|mod| authors.push("  "+mod.title+": "+mod.author)}
+		end
+		Gtk::AboutDialog.show(self, {:name=>$name, :version=>Version, :program_name=>$name,
+			:copyright=>'Copyright 2007-2010 Vincent Carmona', :comments=>_('Audio player'),
+			:website=>'http://zik.rubyforge.org/', :license=>copying,
+			:authors=>authors,
+			:artists=>["Jakub Steiner", "Lapo Calamandrei", "Andreas Nilsson", "Rodney Dawes", "Vincent Carmona"],
+			:translator_credits=>"Français: Vincent Carmona\n",
+			:logo=>Gdk::Pixbuf.new(File.join(Pix_dir,'ZiK3.png'))})
+	end
+end