rpms/perl-Tk/devel perl-Tk-widget.patch, NONE, 1.1 perl-Tk.spec, NONE, 1.1 .cvsignore, 1.1, 1.2 sources, 1.1, 1.2
Andreas Bierfert (awjb)
fedora-extras-commits at redhat.com
Sun Jun 19 21:09:27 UTC 2005
Author: awjb
Update of /cvs/extras/rpms/perl-Tk/devel
In directory cvs-int.fedora.redhat.com:/tmp/cvs-serv16064/devel
Modified Files:
.cvsignore sources
Added Files:
perl-Tk-widget.patch perl-Tk.spec
Log Message:
auto-import perl-Tk-804.027-5 on branch devel from perl-Tk-804.027-5.src.rpm
perl-Tk-widget.patch:
--- NEW FILE perl-Tk-widget.patch ---
--- demos/widget.orig 2005-06-16 22:57:11.000000000 +0200
+++ demos/widget 2005-06-16 23:43:23.000000000 +0200
@@ -6,7 +6,7 @@
use 5.008;
use Config;
use Tk 804.000;
-use lib Tk->findINC( 'demos/widget_lib' );
+use lib "@demopath@/widget_lib";
use Tk::widgets qw/ DialogBox ErrorDialog LabEntry ROText /;
use WidgetDemo;
use subs qw/
@@ -44,9 +44,9 @@
$MW->title('Perl/Tk Widget Demonstration');
$MW->iconname('widget');
$FONT = 'Helvetica 12';
-my $widget_lib = Tk->findINC('demos/widget_lib');
+my $widget_lib = "@demopath@/widget_lib";
my $wd = "$widget_lib/WidgetDemo.pm";
-$WIDTRIB = Tk->findINC('demos/widtrib');
+$WIDTRIB = "@demopath@/widtrib";
unless (Tk::tainting) {
$WIDTRIB = $ENV{WIDTRIB} if defined $ENV{WIDTRIB};
$WIDTRIB = $ARGV[0] if defined $ARGV[0];
--- NEW FILE perl-Tk.spec ---
%{!?perl_vendorarch: %define perl_vendorarch %(eval "`%{__perl} -V:installvendorarch`"; echo $installvendorarch)}
%define perlver %(eval "`%{__perl} -V:version`"; echo $version)
Name: perl-Tk
Version: 804.027
Release: 5
Summary: Perl Graphical User Interface ToolKit
Group: Development/Libraries
License: GPL or Artistic
URL: http://search.cpan.org/dist/Tk/
Source0: http://search.cpan.org/CPAN/authors/id/N/NI/NI-S/Tk-804.027.tar.gz
Patch0: perl-Tk-widget.patch
BuildRoot: %{_tmppath}/%{name}-%{version}-%{release}-root-%(%{__id_u} -n)
# Versions before this have Unicode issues
BuildRequires: perl >= 3:5.8.3
BuildRequires: xorg-x11-devel
BuildRequires: libjpeg-devel
BuildRequires: libpng-devel
Requires: perl(:MODULE_COMPAT_%{perlver})
Provides: perl(Tk::LabRadio) = 4.004
Provides: perl(Tk::TextReindex)
%description
This a re-port of a perl interface to Tk8.4.
C code is derived from Tcl/Tk8.4.5.
It also includes all the C code parts of Tix8.1.4 from SourceForge.
The perl code corresponding to Tix's Tcl code is not fully implemented.
Perl API is essentially the same as Tk800 series Tk800.025 but has not
been verified as compliant. There ARE differences see pod/804delta.pod.
%prep
%setup -q -n Tk-%{version}
find . -type f -exec %{__perl} -pi -e \
's,^(#!)(/usr/local)?/bin/perl\b,$1%{__perl}, if ($. == 1)' {} \;
chmod -x pod/Popup.pod Tixish/lib/Tk/balArrow.xbm
# fix for widget as docs
%patch0
%{__perl} -pi -e \
's,\@demopath\@,%{_datadir}/doc/%{name}-%{version}/demos,g' \
%{_builddir}/Tk-%{version}/demos/widget
%build
%{__perl} Makefile.PL INSTALLDIRS=vendor X11LIB=/usr/X11R6/%{_lib} XFT=1
find . -name Makefile | xargs %{__perl} -pi -e 's/^\tLD_RUN_PATH=[^\s]+\s*/\t/'
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 {} \;
find $RPM_BUILD_ROOT -type f -name '*.bs' -size 0 -exec rm -f {} \;
find $RPM_BUILD_ROOT -type d -depth -exec rmdir {} 2>/dev/null \;
chmod -R u+rwX,go+rX,go-w $RPM_BUILD_ROOT/*
mkdir __demos
cp -pR $RPM_BUILD_ROOT%{perl_vendorarch}/Tk/demos __demos
find __demos/ -type f -perm 555 -exec chmod 444 {} \;
%clean
rm -rf $RPM_BUILD_ROOT
%files
%defattr(-,root,root,-)
%doc Changes README README.linux ToDo pTk/*license* __demos/demos demos/widget
%{_bindir}/p*
%{_bindir}/tkjpeg
%{perl_vendorarch}/auto/Tk
%{perl_vendorarch}/T*
%{_mandir}/man*/*
%exclude %{_bindir}/gedi
%exclude %{_bindir}/widget
%exclude %{perl_vendorarch}/fix_4_os2.pl
%exclude %{perl_vendorarch}/Tk/demos
%exclude %{perl_vendorarch}/Tk/reindex.pl
%changelog
* Thu Jun 16 2005 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
804.027-5
- exclude gedi
- move widget to doc dir and patch it to work from there
* Wed Jun 15 2005 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
804.027-4
- more cleanups from Ville Skyttä
* Wed Jun 15 2005 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
804.027-3
- more cleanups
* Tue Jun 14 2005 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
804.027-2
- add some stuff (e.g. xft) suggested by Steven Pritchard
* Tue Jun 14 2005 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
804.027-1
- rebuild for fc4
* Fri Jun 04 2004 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
0:804.027-0.fdr.1
- Initial Version (thanks to perl-Archive-Zip spec)
Index: .cvsignore
===================================================================
RCS file: /cvs/extras/rpms/perl-Tk/devel/.cvsignore,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- .cvsignore 19 Jun 2005 20:58:29 -0000 1.1
+++ .cvsignore 19 Jun 2005 21:09:25 -0000 1.2
@@ -0,0 +1 @@
+Tk-804.027.tar.gz
Index: sources
===================================================================
RCS file: /cvs/extras/rpms/perl-Tk/devel/sources,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- sources 19 Jun 2005 20:58:29 -0000 1.1
+++ sources 19 Jun 2005 21:09:25 -0000 1.2
@@ -0,0 +1 @@
+d1ca4a6bff6dae4d937fabde4e86256b Tk-804.027.tar.gz
More information about the fedora-extras-commits
mailing list