Sisyphus repository
Last update: 1 october 2023 | SRPMs: 18631 | Visits: 37815926
en ru br
ALT Linux repos
S:0.12-alt4
5.0: 0.12-alt3
4.1: 0.12-alt2
4.0: 0.10-alt1

Group :: Development/Perl
RPM: podbrowser

 Main   Changelog   Spec   Patches   Sources   Download   Gear   Bugs and FR  Repocop 

Patch: podbrowser-0.12-debian-missing_icon.patch
Download


Description: Provide alternative icons if those expected not in current theme
Author:      Jeffrey Ratcliffe <Jeffrey.Ratcliffe@gmail.com>
Index: podbrowser-0.12/podbrowser.pl
===================================================================
--- podbrowser-0.12.orig/podbrowser.pl	2010-05-12 09:20:46.525685070 +0200
+++ podbrowser-0.12/podbrowser.pl	2010-05-12 13:04:37.000000000 +0200
@@ -60,9 +60,22 @@
 my $APP			= Gtk2::GladeXML->new($GLADE_FILE);
 my $THEME		= get_an_icon_theme();
 my $TIPS		= Gtk2::Tooltips->new;
-my $IDX_PBF		= Gtk2::Gdk::Pixbuf->new_from_file($THEME->lookup_icon('stock_bookmark', 16, 'force-svg')->get_filename)->scale_simple(16, 16, 'bilinear');
-my $PAGE_PBF		= Gtk2::Gdk::Pixbuf->new_from_file($THEME->lookup_icon('stock_new-text', 16, 'force-svg')->get_filename)->scale_simple(16, 16, 'bilinear');
-my $FOLDER_PBF		= Gtk2::Gdk::Pixbuf->new_from_file($THEME->lookup_icon('gnome-fs-directory', 16, 'force-svg')->get_filename)->scale_simple(16, 16, 'bilinear');
+my ( $IDX_PBF, $PAGE_PBF, $FOLDER_PBF );
+if ($THEME->lookup_icon('stock_bookmark', 16, 'force-svg')) {
+  $IDX_PBF		= Gtk2::Gdk::Pixbuf->new_from_file($THEME->lookup_icon('stock_bookmark', 16, 'force-svg')->get_filename)->scale_simple(16, 16, 'bilinear');
+} else {
+  $IDX_PBF              = Gtk2::Image->new->render_icon( 'gtk-index', 'menu' );
+}
+if ($THEME->lookup_icon('stock_new-text', 16, 'force-svg')) {
+  $PAGE_PBF		= Gtk2::Gdk::Pixbuf->new_from_file($THEME->lookup_icon('stock_new-text', 16, 'force-svg')->get_filename)->scale_simple(16, 16, 'bilinear');
+} else {
+  $PAGE_PBF            = Gtk2::Image->new->render_icon( 'gtk-new', 'menu' );
+}
+if ($THEME->lookup_icon('gnome-fs-directory', 16, 'force-svg')) {
+  $FOLDER_PBF		= Gtk2::Gdk::Pixbuf->new_from_file($THEME->lookup_icon('gnome-fs-directory', 16, 'force-svg')->get_filename)->scale_simple(16, 16, 'bilinear');
+} else {
+  $FOLDER_PBF          = Gtk2::Image->new->render_icon( 'gtk-directory', 'menu' );
+}
 my $NORMAL_CURSOR	= Gtk2::Gdk::Cursor->new('left_ptr');
 my $BUSY_CURSOR		= Gtk2::Gdk::Cursor->new('watch');
 my $ITEMS		= {};
 
design & coding: Vladimir Lettiev aka crux © 2004-2005, Andrew Avramenko aka liks © 2007-2008
current maintainer: Michael Shigorin