12:47 p.m.
Author: kwizart
Update of /cvs/free/rpms/xmltv/F-8
In directory se02.es.rpmfusion.net:/tmp/cvs-serv17712
Modified Files:
sources
Added Files:
xmltv.spec xmltv-0.5.35-noask.patch
xmltv-0.5.52-noutf8simple.patch
Log Message:
Import for F-8
--- NEW FILE xmltv.spec ---
Name: xmltv
Version: 0.5.53
Release: 2%{?dist}
Summary: A set of utilities to manage your TV viewing
Group: Development/Libraries
License: GPLv2+
URL: http://xmltv.org/wiki/
Source0: http://downloads.sourceforge.net/xmltv/xmltv-%{version}.tar.bz2
Patch0: xmltv-0.5.35-noask.patch
Patch1: xmltv-0.5.52-noutf8simple.patch
BuildRoot: %{_tmppath}/%{name}-%{version}-%{release}-root-%(%{__id_u} -n)
BuildArch: noarch
BuildRequires: perl(ExtUtils::MakeMaker)
BuildRequires: perl(LWP) >= 5.65, perl(XML::Parser) >= 2.34
BuildRequires: perl(XML::Twig) >= 3.28
BuildRequires: perl(Date::Manip) >= 5.42
BuildRequires: perl(XML::Writer) >= 0.600
BuildRequires: perl(Memoize), perl(Storable) >= 2.04
BuildRequires: perl(File::Slurp)
# Recommended
BuildRequires: perl(Lingua::EN::Numbers::Ordinate)
BuildRequires: perl(Lingua::Preferred) >= 0.2.4
BuildRequires: perl(Term::ProgressBar) >= 2.03
BuildRequires: perl(Compress::Zlib)
BuildRequires: perl(Unicode::String)
###
BuildRequires: perl(HTML::TreeBuilder)
BuildRequires: perl(HTML::Entities) >= 1.27
BuildRequires: perl(WWW::Mechanize) => 1.16
BuildRequires: perl(HTTP::Cookies) >= 1.39
BuildRequires: perl(HTML::Form)
BuildRequires: perl(HTTP::Cache::Transparent)
BuildRequires: perl(LWP::Simple)
BuildRequires: perl(IO::Scalar), perl(Archive::Zip)
BuildRequires: perl(XML::Simple)
BuildRequires: perl(SOAP::Lite) >= 0.67, perl(Term::ReadKey)
%{?_with_text_bidi:BuildRequires: perl(Text::Bidi)}
BuildRequires: perl(Text::Kakasi)
BuildRequires: perl(XML::LibXML)
BuildRequires: perl(XML::DOM)
BuildRequires: perl(XML::LibXSLT)
BuildRequires: perl(Compress::Zlib)
BuildRequires: perl(IO::Stringy)
BuildRequires: perl(File::Temp)
BuildRequires: perl(Tk::TableMatrix)
BuildRequires: perl(CGI)
BuildRequires: perl(HTML::TokeParser), perl(Date::Parse), perl(Time::Local)
BuildRequires: perl(HTML::TableExtract) >= 1.08
BuildRequires: perl(HTML::Parser) >= 3.34
BuildRequires: perl(Log::TraceMessages)
Requires: xmltv-grabbers >= %{version}-%{release}
%description
XMLTV is a set of utilities to manage your TV viewing. They work with
TV listings stored in the XMLTV format, which is based on XML. The
idea is to separate out the backend (getting the listings) from the
frontend (displaying them for the user), and to implement useful
operations like picking out your favourite programmes as filters that
read and write XML documents.
%package -n perl-XMLTV
Summary: Perl modules for managing your TV viewing
Group: System Environment/Libraries
Requires: perl(:MODULE_COMPAT_%(eval "`%{__perl} -V:version`"; echo $version))
%description -n perl-XMLTV
XMLTV is a set of utilities to manage your TV viewing. They work with
TV listings stored in the XMLTV format, which is based on XML. The
idea is to separate out the backend (getting the listings) from the
frontend (displaying them for the user), and to implement useful
operations like picking out your favourite programmes as filters that
read and write XML documents.
This package contains the perl modules from xmltv.
%package grabbers
Summary: Backends for xmltv
Group: Applications/Multimedia
Requires: perl-XMLTV >= %{version}-%{release}
%description grabbers
XMLTV is a set of utilities to manage your TV viewing. They work with
TV listings stored in the XMLTV format, which is based on XML. The
idea is to separate out the backend (getting the listings) from the
frontend (displaying them for the user), and to implement useful
operations like picking out your favourite programmes as filters that
read and write XML documents.
This package contains the backends (grabbers) for xmltv.
%package gui
Summary: Graphical frontends to xmltv
Group: Applications/Multimedia
Requires: perl-XMLTV >= %{version}-%{release}
%description gui
XMLTV is a set of utilities to manage your TV viewing. They work with
TV listings stored in the XMLTV format, which is based on XML. The
idea is to separate out the backend (getting the listings) from the
frontend (displaying them for the user), and to implement useful
operations like picking out your favourite programmes as filters that
read and write XML documents.
This package contains graphical frontends to xmltv.
%prep
%setup -q
%patch0 -p1 -b .noask
%patch1 -p1 -b .noutf8simple
# Fix encoding
cp -pr ChangeLog ChangeLog.not-utf8
iconv -f ISO_8859-1 -t UTF8 ChangeLog.not-utf8 > ChangeLog
touch -r ChangeLog.not-utf8 ChangeLog
rm ChangeLog.not-utf8
# We filter theses from perl-XMLTV as it already has the infra
#for the tui/gui test. And then xmltv-gui will request perl(Tk::TableMatrix)
#which last will bring the previously filtered ones.
# Filter unwanted Requires:
cat << \EOF > %{name}-req
#!/bin/sh
%{__perl_requires} $* |\
sed -e '/perl(Tk)/d' | \
sed -e '/perl(Tk::ProgressBar)/d'
EOF
%define __perl_requires %{_builddir}/xmltv-%{version}/%{name}-req
chmod +x %{name}-req
%build
%{__perl} Makefile.PL INSTALLDIRS=vendor
make %{?_smp_mflags}
%install
rm -rf $RPM_BUILD_ROOT
make pure_install PERL_INSTALL_ROOT=$RPM_BUILD_ROOT
find $RPM_BUILD_ROOT -type f -name .packlist -exec rm -f {} ';'
# Fix perms
chmod 0755 $RPM_BUILD_ROOT%{_bindir}/*
%check
make test
%clean
rm -rf $RPM_BUILD_ROOT
%files
%defattr(-,root,root,-)
%doc ChangeLog README
%doc doc/*
%{_bindir}/tv_cat
%{_bindir}/tv_extractinfo_en
%{_bindir}/tv_extractinfo_ar
%{_bindir}/tv_grep
%{_bindir}/tv_imdb
%{_bindir}/tv_remove_some_overlapping
%{_bindir}/tv_sort
%{_bindir}/tv_split
%{_bindir}/tv_to_latex
%{_bindir}/tv_to_text
%{_bindir}/tv_to_potatoe
%{_bindir}/tv_find_grabbers
%{_bindir}/tv_validate_file
%{_bindir}/tv_validate_grabber
%{_mandir}/man1/tv_cat.1*
%{_mandir}/man1/tv_extractinfo_en.1*
%{_mandir}/man1/tv_extractinfo_ar.1*
%{_mandir}/man1/tv_grep.1*
%{_mandir}/man1/tv_imdb.1*
%{_mandir}/man1/tv_remove_some_overlapping.1*
%{_mandir}/man1/tv_sort.1*
%{_mandir}/man1/tv_split.1*
%{_mandir}/man1/tv_to_latex.1*
%{_mandir}/man1/tv_to_text.1*
%{_mandir}/man1/tv_to_potatoe.1*
%{_mandir}/man1/tv_find_grabbers.1*
%{_mandir}/man1/tv_validate_file.1*
%{_mandir}/man1/tv_validate_grabber.1*
%files -n perl-XMLTV
%defattr(-,root,root,-)
%{perl_vendorlib}/XMLTV.pm
%{perl_vendorlib}/XMLTV
%{_mandir}/man3/*.3*
%files grabbers
%defattr(-,root,root,-)
%{_bindir}/tv_grab_*
%{_mandir}/man1/tv_grab_*.1*
%files gui
%defattr(-,root,root,-)
%{_bindir}/tv_check
%{_mandir}/man1/tv_check.1*
%changelog
* Wed Oct 15 2008 kwizart < kwizart at gmail.com > - 0.5.53-2
- Add "is" (Iceland) grabber support
* Tue Oct 14 2008 kwizart < kwizart at gmail.com > - 0.5.53-1
- Update to 0.5.53
- Remove -gui requirement on main
- filter perl-Tk dependency on perl-XMLTV
- Re-enable make test
* Thu Jul 31 2008 kwizart < kwizart at gmail.com > - 0.5.52-3
- Add BR perl(Log::TraceMessages)
- Fix perms for %%{_bindir}
- Fix Changelog encoding
* Mon Jul 28 2008 kwizart < kwizart at gmail.com > - 0.5.52-2
- Conditionalize make test
* Sun Jul 20 2008 kwizart < kwizart at gmail.com > - 0.5.52-1
- Update to 0.5.52
* Tue May 27 2008 kwizart < kwizart at gmail.com > - 0.5.51-2
- Add patch to remove BR on Unicode::UTF8simple (backport from upstream)
* Wed Apr 30 2008 kwizart < kwizart at gmail.com > - 0.5.51-1
- Initial package for RPMFusion
xmltv-0.5.35-noask.patch:
--- NEW FILE xmltv-0.5.35-noask.patch ---
--- xmltv-0.5.35/Makefile.PL.noask 2004-09-27 23:10:51.000000000 +0200
+++ xmltv-0.5.35/Makefile.PL 2004-09-28 16:43:21.261899085 +0200
@@ -473,7 +473,8 @@
"\n");
}
print STDERR "\n";
- if (not ask(0, 'Do you want to proceed with this configuration?', 1)) {
+# if (not ask(0, 'Do you want to proceed with this configuration?', 1)) {
+ if (0) {
# Need to set {install} for each component by prompting.
foreach my $info (@opt_components) {
my $missing = $info->{missing};
xmltv-0.5.52-noutf8simple.patch:
--- NEW FILE xmltv-0.5.52-noutf8simple.patch ---
diff -up xmltv-0.5.51/grab/pt/tv_grab_pt.noutf8simple xmltv-0.5.51/grab/pt/tv_grab_pt
--- xmltv-0.5.51/grab/pt/tv_grab_pt.noutf8simple 2007-09-04 11:42:49.000000000 +0200
+++ xmltv-0.5.51/grab/pt/tv_grab_pt 2008-05-27 16:24:51.000000000 +0200
@@ -85,7 +85,8 @@ use IO::File;
use File::Path;
use File::Basename;
use LWP::UserAgent;
-use Unicode::UTF8simple;
+use utf8;
+use Encode qw(from_to); # This is deprecated to use Unicode::UTF8simple;
use XMLTV;
use XMLTV::Memoize;
@@ -660,7 +661,7 @@ sub get_channels {
my $tree = get_nice_tree $url;
my @menus = $tree->find_by_tag_name( "_tag" => "select" );
- my $uref = new Unicode::UTF8simple;
+ #my $uref = from_to Encode; #Unicode::UTF8simple;
foreach my $elem (@menus) {
my $cname = $elem->attr('name');
@@ -678,7 +679,7 @@ sub get_channels {
next if $channel_id eq 'ALL';
my $channel_name = trim( $opt->content->[0] );
- $channel_name = $uref->toUTF8( "iso-8859-1", $channel_name );
+ from_to( $channel_name, "iso-8859-1", "utf8");
$channels{$channel_id} = $channel_name;
push @ch_all,
{
diff -up xmltv-0.5.51/Makefile.PL.noutf8simple xmltv-0.5.51/Makefile.PL
--- xmltv-0.5.51/Makefile.PL.noutf8simple 2008-05-27 16:24:51.000000000 +0200
+++ xmltv-0.5.51/Makefile.PL 2008-05-27 16:24:51.000000000 +0200
@@ -557,7 +556,6 @@ my @opt_components
blurb => 'Grabber for Portugal',
exes => [ 'grab/pt/tv_grab_pt' ],
prereqs => { 'HTML::TreeBuilder' => 0,
- 'Unicode::UTF8simple' => 0,
}
},
Index: sources
===================================================================
RCS file: /cvs/free/rpms/xmltv/F-8/sources,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- sources 20 Oct 2008 08:39:02 -0000 1.1
+++ sources 20 Oct 2008 12:47:14 -0000 1.2
@@ -0,0 +1 @@
+9ee2d6c8bb192e214b2674042260cf36 xmltv-0.5.53.tar.bz2