d1ab35
%{!?perl_vendorarch: %define perl_vendorarch %(eval "`%{__perl} -V:installvendorarch`"; echo $installvendorarch)}
d1ab35
%define perlver %(eval "`%{__perl} -V:version`"; echo $version)
d1ab35
d1ab35
Name:           perl-Tk
d1ab35
# devel version fix for perl 5.14: 
d1ab35
Version:        804.030
d1ab35
Release:        6%{?dist}
d1ab35
Summary:        Perl Graphical User Interface ToolKit
d1ab35
d1ab35
Group:          Development/Libraries
d1ab35
License:        (GPL+ or Artistic) and SWL
d1ab35
URL:            http://search.cpan.org/dist/Tk/
d1ab35
Source0:        http://search.cpan.org/CPAN/authors/id/S/SR/SREZIC/Tk-%{version}.tar.gz
d1ab35
Patch0:         perl-Tk-widget.patch
d1ab35
# modified version of http://ftp.de.debian.org/debian/pool/main/p/perl-tk/perl-tk_804.027-8.diff.gz
d1ab35
Patch1:         perl-Tk-debian.patch.gz
d1ab35
# fix segfaults as in #235666 because of broken cashing code
d1ab35
Patch2:         perl-Tk-seg.patch
d1ab35
# fixes file modes changed while building, #1017322
d1ab35
Patch3:         perl-Tk-Preserve-mode-on-pTk-files.patch
d1ab35
d1ab35
# Versions before this have Unicode issues
d1ab35
BuildRequires:  perl-devel >= 3:5.8.3
d1ab35
BuildRequires:  libjpeg-devel
d1ab35
BuildRequires:  libpng-devel
d1ab35
BuildRequires:  libX11-devel
d1ab35
BuildRequires:  libXft-devel
d1ab35
BuildRequires:  perl(Config)
d1ab35
BuildRequires:  perl(Cwd)
d1ab35
BuildRequires:  perl(ExtUtils::MakeMaker)
d1ab35
BuildRequires:  perl(lib)
d1ab35
d1ab35
Requires:       perl(:MODULE_COMPAT_%{perlver})
d1ab35
Provides:       perl(Tk::LabRadio) = 4.004
d1ab35
Provides:       perl(Tk) = %{version}
d1ab35
d1ab35
%{?perl_default_filter}
d1ab35
# Explicity filter "useless" unversioned provides. For some reason, rpm is
d1ab35
# detecting these both with and without version.
d1ab35
%global __provides_exclude %{?__provides_exclude:%__provides_exclude|}perl\\(Tk\\)
d1ab35
%global __provides_exclude %__provides_exclude|perl\\(Tk::Clipboard\\)$
d1ab35
%global __provides_exclude %__provides_exclude|perl\\(Tk::Frame\\)$
d1ab35
%global __provides_exclude %__provides_exclude|perl\\(Tk::Listbox\\)$
d1ab35
%global __provides_exclude %__provides_exclude|perl\\(Tk::Scale\\)$
d1ab35
%global __provides_exclude %__provides_exclude|perl\\(Tk::Scrollbar\\)$
d1ab35
%global __provides_exclude %__provides_exclude|perl\\(Tk::Table\\)$
d1ab35
%global __provides_exclude %__provides_exclude|perl\\(Tk::Toplevel\\)$
d1ab35
%global __provides_exclude %__provides_exclude|perl\\(Tk::Widget\\)$
d1ab35
%global __provides_exclude %__provides_exclude|perl\\(Tk::Wm\\)$
d1ab35
d1ab35
d1ab35
%description
d1ab35
This a re-port of a perl interface to Tk8.4.
d1ab35
C code is derived from Tcl/Tk8.4.5.
d1ab35
It also includes all the C code parts of Tix8.1.4 from SourceForge.
d1ab35
The perl code corresponding to Tix's Tcl code is not fully implemented.
d1ab35
d1ab35
Perl API is essentially the same as Tk800 series Tk800.025 but has not
d1ab35
been verified as compliant. There ARE differences see pod/804delta.pod.
d1ab35
d1ab35
%package devel
d1ab35
Summary: perl-Tk ExtUtils::MakeMaker support module
d1ab35
Requires: perl-Tk = %{version}-%{release}
d1ab35
d1ab35
%description devel
d1ab35
%{summary}
d1ab35
d1ab35
%prep
d1ab35
%setup -q -n Tk-%{version}
d1ab35
find . -type f -exec %{__perl} -pi -e \
d1ab35
's,^(#!)(/usr/local)?/bin/perl\b,$1%{__perl}, if ($. == 1)' {} \;
d1ab35
chmod -x pod/Popup.pod Tixish/lib/Tk/balArrow.xbm
d1ab35
# fix for widget as docs
d1ab35
%patch0
d1ab35
%{__perl} -pi -e \
d1ab35
's,\@demopath\@,%{_datadir}/doc/%{name}-%{version}/demos,g' demos/widget
d1ab35
# debian patch
d1ab35
%patch1 -p1
d1ab35
# patch to fix #235666 ... seems like caching code is broken
d1ab35
%patch2 -p1 -b .seg
d1ab35
# file modes, #1017322
d1ab35
%patch3 -p1
d1ab35
d1ab35
%build
d1ab35
%{__perl} Makefile.PL INSTALLDIRS=vendor X11LIB=%{_libdir} XFT=1
d1ab35
find . -name Makefile | xargs %{__perl} -pi -e 's/^\tLD_RUN_PATH=[^\s]+\s*/\t/'
d1ab35
make %{?_smp_mflags}
d1ab35
d1ab35
# disable because they need an x screen
d1ab35
%check
d1ab35
# make test
d1ab35
d1ab35
%install
d1ab35
make pure_install DESTDIR=$RPM_BUILD_ROOT
d1ab35
d1ab35
find $RPM_BUILD_ROOT -type f -name .packlist -exec rm -f {} \;
d1ab35
find $RPM_BUILD_ROOT -type f -name '*.bs' -size 0 -exec rm -f {} \;
d1ab35
d1ab35
chmod -R u+rwX,go+rX,go-w $RPM_BUILD_ROOT/*
d1ab35
mkdir __demos
d1ab35
cp -pR $RPM_BUILD_ROOT%{perl_vendorarch}/Tk/demos __demos
d1ab35
find __demos/ -type f -exec chmod -x {} \;
d1ab35
d1ab35
%files
d1ab35
%doc Changes README README.linux ToDo pTk/*license* __demos/demos demos/widget COPYING
d1ab35
%doc blib/man1/widget.1
d1ab35
%{_bindir}/p*
d1ab35
%{_bindir}/tkjpeg
d1ab35
%{perl_vendorarch}/auto/Tk
d1ab35
%{perl_vendorarch}/T*
d1ab35
%exclude %{perl_vendorarch}/Tk/MMutil.pm
d1ab35
%exclude %{perl_vendorarch}/Tk/install.pm
d1ab35
%exclude %{perl_vendorarch}/Tk/MakeDepend.pm
d1ab35
%{_mandir}/man*/*
d1ab35
%exclude %{_mandir}/man1/widget.1*
d1ab35
%exclude %{_bindir}/gedi
d1ab35
%exclude %{_bindir}/widget
d1ab35
%exclude %{perl_vendorarch}/Tk/demos
d1ab35
d1ab35
%files devel
d1ab35
%dir %{perl_vendorarch}/Tk
d1ab35
%{perl_vendorarch}/Tk/MMutil.pm
d1ab35
%{perl_vendorarch}/Tk/install.pm
d1ab35
%{perl_vendorarch}/Tk/MakeDepend.pm
d1ab35
d1ab35
d1ab35
%changelog
d1ab35
* Fri Jan 24 2014 Daniel Mach <dmach@redhat.com> - 804.030-6
d1ab35
- Mass rebuild 2014-01-24
d1ab35
d1ab35
* Fri Dec 27 2013 Daniel Mach <dmach@redhat.com> - 804.030-5
d1ab35
- Mass rebuild 2013-12-27
d1ab35
d1ab35
* Wed Nov 06 2013 Petr Pisar <ppisar@redhat.com> - 804.030-4
d1ab35
- Fix file modes changed while building (bug #1017322)
d1ab35
- Correct change log entry date (bug #1017322)
d1ab35
d1ab35
* Tue Jul 30 2013 Jitka Plesnikova <jplesnik@redhat.com> - 804.030-3
d1ab35
- Fix license
d1ab35
d1ab35
* Tue Jul 23 2013 Jitka Plesnikova <jplesnik@redhat.com> - 804.030-2
d1ab35
- Update license - add SWL
d1ab35
- Specify all dependencies
d1ab35
- Replace PERL_INSTALL_ROOT with DESTDIR
d1ab35
- Drop removing of empty directory
d1ab35
- Package COPYING
d1ab35
d1ab35
* Wed Aug 29 2012 Jitka Plesnikova <jplesnik@redhat.com> - 804.030-1
d1ab35
- 804.030 bump, update source link
d1ab35
d1ab35
* Fri Jul 20 2012 Fedora Release Engineering <rel-eng@lists.fedoraproject.org> - 804.029-9
d1ab35
- Rebuilt for https://fedoraproject.org/wiki/Fedora_18_Mass_Rebuild
d1ab35
d1ab35
* Thu Jun 07 2012 Petr Pisar <ppisar@redhat.com> - 804.029-8
d1ab35
- Perl 5.16 rebuild
d1ab35
d1ab35
* Thu Jun 07 2012 Petr Pisar <ppisar@redhat.com> - 804.029-7
d1ab35
- Perl 5.16 rebuild
d1ab35
d1ab35
* Fri Jan 13 2012 Fedora Release Engineering <rel-eng@lists.fedoraproject.org> - 804.029-6
d1ab35
- Rebuilt for https://fedoraproject.org/wiki/Fedora_17_Mass_Rebuild
d1ab35
d1ab35
* Thu Nov 10 2011 Iain Arnell <iarnell@gmail.com> 804.029-5
d1ab35
- Rebuild for libpng 1.5
d1ab35
d1ab35
* Fri Oct 21 2011 Ralf Corsépius <corsepiu@fedoraproject.org> 804.029-4
d1ab35
- Split out Tk/MMutil.pm, Tk/install.pm, Tk/MakeDepend.pm into perl-Tk-devel.
d1ab35
  (Avoid dependency on perl-devel - BZ 741777).
d1ab35
d1ab35
* Tue Jun 21 2011 Iain Arnell <iarnell@gmail.com> 804.029-3
d1ab35
- Perl mass rebuild
d1ab35
d1ab35
* Tue Jun 21 2011 Iain Arnell <iarnell@gmail.com> 804.029-2
d1ab35
- properly filter useless provides
d1ab35
d1ab35
* Fri Jun 17 2011 Iain Arnell <iarnell@gmail.com> 804.029-1
d1ab35
- update to 804.029_500 development version to fix FTBFS with perl 5.14
d1ab35
- clean up spec for modern rpmbuild
d1ab35
- use perl_default_filter and filter useless provides
d1ab35
d1ab35
* Fri Jun 17 2011 Marcela Mašláňová <mmaslano@redhat.com> - 804.028-16
d1ab35
- Perl mass rebuild
d1ab35
d1ab35
* Thu Jun 09 2011 Marcela Mašláňová <mmaslano@redhat.com> - 804.028-15
d1ab35
- Perl 5.14 mass rebuild
d1ab35
d1ab35
* Wed Feb 09 2011 Fedora Release Engineering <rel-eng@lists.fedoraproject.org> - 804.028-14
d1ab35
- Rebuilt for https://fedoraproject.org/wiki/Fedora_15_Mass_Rebuild
d1ab35
d1ab35
* Thu Dec 23 2010 Marcela Maslanova <mmaslano@redhat.com> - 804.028-13
d1ab35
- 661697 rebuild for fixing problems with vendorach/lib
d1ab35
d1ab35
* Fri May 07 2010 Marcela Maslanova <mmaslano@redhat.com> - 804.028-12
d1ab35
- Mass rebuild with perl-5.12.0 & update to development release
d1ab35
d1ab35
* Fri Dec  4 2009 Stepan Kasal <skasal@redhat.com> - 804.028-11
d1ab35
- rebuild against perl 5.10.1
d1ab35
d1ab35
* Sun Jul 26 2009 Fedora Release Engineering <rel-eng@lists.fedoraproject.org> - 804.028-10
d1ab35
- Rebuilt for https://fedoraproject.org/wiki/Fedora_12_Mass_Rebuild
d1ab35
d1ab35
* Mon Jun 22 2009 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
d1ab35
- 804.028-9
d1ab35
- fix getOpenFile (#487122)
d1ab35
d1ab35
* Mon Jun 15 2009 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
d1ab35
- 804.028-8
d1ab35
- fix events (#489228, #491536, #506496) 
d1ab35
d1ab35
* Thu Mar 19 2009 Stepan Kasal <skasal@redhat.com> - 804.028-7
d1ab35
- perl-Tk-XIM.patch (#489228)
d1ab35
d1ab35
* Thu Feb 26 2009 Fedora Release Engineering <rel-eng@lists.fedoraproject.org> - 804.028-6
d1ab35
- Rebuilt for https://fedoraproject.org/wiki/Fedora_11_Mass_Rebuild
d1ab35
d1ab35
* Tue Mar 11 2008 Tom "spot" Callaway <tcallawa@redhat.com> 804.028-5
d1ab35
- rework patch2 to fix menu and test case failures (bz 431330, upstream 33880)
d1ab35
d1ab35
* Tue Feb 05 2008 Tom "spot" Callaway <tcallawa@redhat.com>
d1ab35
- 804.028-4
d1ab35
- rebuild for new perl
d1ab35
d1ab35
* Tue Feb 05 2008 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
d1ab35
- 804.028-3
d1ab35
- fix #431529 gif overflow in tk (see also #431518)
d1ab35
d1ab35
* Fri Jan 04 2008 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
d1ab35
- 804.028-2
d1ab35
- add relevant parts of debian patch
d1ab35
- add patch for #235666
d1ab35
d1ab35
* Wed Jan 02 2008 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
d1ab35
- 804.028-1
d1ab35
- version upgrade
d1ab35
- fix #210718 SIGSEGV on exit from texdoctk
d1ab35
- fix #234404 Cannot manage big listboxes
d1ab35
- fix #235666 Segfault occurs when using Perl-Tk on FC6
d1ab35
d1ab35
* Wed Dec 19 2007 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
d1ab35
- 804.027-13
d1ab35
- fix BR
d1ab35
d1ab35
* Wed Aug 22 2007 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
d1ab35
- 804.027-12
d1ab35
- rebuild for buildid
d1ab35
d1ab35
* Sun Apr 01 2007 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
d1ab35
804.027-11
d1ab35
- F7 rebuild (#234404)
d1ab35
d1ab35
* Fri Sep 15 2006 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
d1ab35
804.027-10
d1ab35
- FE6 rebuild
d1ab35
d1ab35
* Thu Feb 16 2006 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
d1ab35
804.027-9
d1ab35
- Rebuild for Fedora Extras 5
d1ab35
d1ab35
* Fri Nov 25 2005 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
d1ab35
804.027-8
d1ab35
- modular xorg integration
d1ab35
d1ab35
* Sun Jul 31 2005 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
d1ab35
804.027-7
d1ab35
- fix #164716
d1ab35
d1ab35
* Mon Jun 20 2005 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
d1ab35
804.027-6
d1ab35
- some small cleanups
d1ab35
- add dist tag
d1ab35
d1ab35
* Thu Jun 16 2005 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
d1ab35
804.027-5
d1ab35
- exclude gedi
d1ab35
- move widget to doc dir and patch it to work from there
d1ab35
d1ab35
* Wed Jun 15 2005 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
d1ab35
804.027-4
d1ab35
- more cleanups from Ville Skyttä
d1ab35
d1ab35
* Wed Jun 15 2005 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
d1ab35
804.027-3
d1ab35
- more cleanups
d1ab35
d1ab35
* Tue Jun 14 2005 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
d1ab35
804.027-2
d1ab35
- add some stuff (e.g. xft) suggested by Steven Pritchard
d1ab35
d1ab35
* Tue Jun 14 2005 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
d1ab35
804.027-1
d1ab35
- rebuild for fc4
d1ab35
d1ab35
* Fri Jun 04 2004 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
d1ab35
0:804.027-0.fdr.1
d1ab35
- Initial Version (thanks to perl-Archive-Zip spec)