Репозиторий Sisyphus
Последнее обновление: 1 октября 2023 | Пакетов: 18631 | Посещений: 37817008
en ru br
Репозитории ALT
S:0.12-alt4
5.1: 0.12-alt3
4.1: 0.12-alt2
4.0: 0.10-alt1
www.altlinux.org/Changes

Группа :: Разработка/Perl
Пакет: podbrowser

 Главная   Изменения   Спек   Патчи   Sources   Загрузить   Gear   Bugs and FR  Repocop 

Патч: podbrowser-0.12-alt-opener.patch
Скачать


Fallback to the $BROWSER environment variable in non-gnome systems while running browser for external URLs.
--- ./podbrowser.pl
+++ ./podbrowser.pl
@@ -58,7 +58,12 @@
 }
 
 ### bits we'll be reusing:
-chomp(my $OPENER	= `which gnome-open 2> /dev/null`);
+chomp(my $OPENER	= $ENV{BROWSER});
+unless ("$OPENER") { # No browser is configured 
+    chomp($OPENER	= `which gnome-open 2> /dev/null`);
+    chomp($OPENER	= `whereis gnome-open | sed -n 's/.*: \([^ ]\+\) .*/\1/p'`) if (!-x "$OPENER"); # Fallback for missed 'which'
+}
+
 my $APP			= Gtk2::GladeXML->new($GLADE_FILE);
 my $THEME		= get_an_icon_theme();
 my $TIPS		= Gtk2::Tooltips->new;
@@ -765,7 +770,7 @@
 sub open_url {
 	my $url = (ref($_[0]) eq 'Gtk2::AboutDialog' ? $_[1] : $_[0]);
 
-	if (!-x $OPENER) {
+	unless ("$OPENER") {	# We can't find any OPENER in the system
 		my $dialog = Gtk2::MessageDialog->new($APP->get_widget('main_window'), 'modal', 'info', 'ok', gettext('Error opening URL'));
 		$dialog->format_secondary_text("The 'gnome-open' program could not be found.");
 		$dialog->signal_connect('response', sub { $dialog->destroy });
 
дизайн и разработка: Vladimir Lettiev aka crux © 2004-2005, Andrew Avramenko aka liks © 2007-2008
текущий майнтейнер: Michael Shigorin