rpms/perl-pmtools/devel perl-pmtools.spec, NONE, 1.1 pmtools-1.00-different-tarball.patch, NONE, 1.1 pmtools-1.00-pmall.patch, NONE, 1.1 pmtools-1.00-pmeth-pman2pmman.patch, NONE, 1.1 .cvsignore, 1.1, 1.2 sources, 1.1, 1.2

Jose Pedro Oliveira (jpo) fedora-extras-commits at redhat.com
Thu Mar 17 02:06:22 UTC 2005


Author: jpo

Update of /cvs/extras/rpms/perl-pmtools/devel
In directory cvs-int.fedora.redhat.com:/tmp/cvs-serv24484/devel

Modified Files:
	.cvsignore sources 
Added Files:
	perl-pmtools.spec pmtools-1.00-different-tarball.patch 
	pmtools-1.00-pmall.patch pmtools-1.00-pmeth-pman2pmman.patch 
Log Message:
auto-import perl-pmtools-1.00-0.fdr.1 on branch devel from perl-pmtools-1.00-0.fdr.1.src.rpm


--- NEW FILE perl-pmtools.spec ---
%{!?perl_vendorlib: %define perl_vendorlib %(eval "`%{__perl} -V:installvendorlib`"; echo $installvendorlib)}

Name:           perl-pmtools
Version:        1.00
Release:        0.fdr.1
Epoch:          0
Summary:        A suite of small programs to help manage Perl modules

Group:          Development/Libraries
License:        Artistic
Url:            http://language.perl.com/
Source:         http://history.perl.org/src/pmtools-1.00.tar.gz
Patch1:         pmtools-1.00-different-tarball.patch
Patch2:         pmtools-1.00-pmall.patch
Patch3:         pmtools-1.00-pmeth-pman2pmman.patch
BuildRoot:      %{_tmppath}/%{name}-%{version}-%{release}-root-%(%{__id_u} -n)

BuildArch:      noarch
BuildRequires:  perl >= 1:5.6.1
Requires:  perl(:MODULE_COMPAT_%(eval "`%{__perl} -V:version`"; echo $version))

%description
This is pmtools -- a suite of small programs to help manage modules.
The names are totally preliminary, and in fact, so is the code.  We follow
the "keep it small" notion of many tiny tools each doing one thing well,
eschewing giant megatools with millions of options.

Tom Christiansen


%prep
%setup -q -n pmtools-%{version}
%patch1 -p1
%patch2 -p1
%patch3 -p1
chmod 755 pmman
find . -type f -perm 755 | xargs %{__perl} -pi -e 's{^#!/usr/bin/env perl}{#!%{__perl}}'


%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 {} ';'
find $RPM_BUILD_ROOT -type d -depth -exec rmdir {} 2>/dev/null ';'
chmod -R u+w $RPM_BUILD_ROOT/*


%check || :
make test


%clean
rm -rf $RPM_BUILD_ROOT


%files
%defattr(-,root,root,-)
%doc README
%{_bindir}/*
%{perl_vendorlib}/Devel/
%{_mandir}/man1/*.1*
%{_mandir}/man3/*.3*


%changelog
* Sun Feb 06 2005 Jose Pedro Oliveira <jpo at di.uminho.pt> - 0:1.00-0.fdr.1
- Valid source file link found.
- Package renamed to 'perl-pmtools' in order to avoid name clash with
  the ACPI debugging tools (pmtools).

* Tue Dec 28 2004 Jose Pedro Oliveira <jpo at di.uminho.pt> - 0:1.00-0.fdr.1
- The patch adds a missing target in Makefile.PL (pmeth) and renames the
  script 'pman' into 'pmman' in order to avoid a filename clash with
  the pinfo package.

* Sat Feb 28 2004 Jose Pedro Oliveira <jpo at di.uminho.pt> 0:1.00-0.fdr.0
- Initial build for fedora.us

pmtools-1.00-different-tarball.patch:

--- NEW FILE pmtools-1.00-different-tarball.patch ---
diff -ruN pmtools-1.00-history/pmall pmtools-1.00/pmall
--- pmtools-1.00-history/pmall	1999-02-16 01:18:36.000000000 +0000
+++ pmtools-1.00/pmall	1999-02-22 17:56:21.000000000 +0000
@@ -132,7 +132,7 @@
     # This should really use system(), because otherwise we bloat.
     my $mod = shift;
     local $SIG{__WARN__} = sub {};
-    eval "require $mod";
+    eval "local \$^W = 0; require $module";
     if ($@) {
 	warn "Cannot require $mod -- $@\n"
 	    if $opt_v;
diff -ruN pmtools-1.00-history/pmeth pmtools-1.00/pmeth
--- pmtools-1.00-history/pmeth	1999-02-16 01:18:48.000000000 +0000
+++ pmtools-1.00/pmeth	1999-02-22 17:56:25.000000000 +0000
@@ -16,7 +16,7 @@
     my $module = shift;
     my @indirect = @_;
     my @baseclasses = @indirect[ 0 .. ($#indirect-1) ];
-    eval "require $module";
+    eval "local \$^W = 0; require $module";
     if ($@) {
 	$@ =~ s/at \(eval.*$//;
 	warn "$0: $@";
diff -ruN pmtools-1.00-history/pmexp pmtools-1.00/pmexp
--- pmtools-1.00-history/pmexp	1999-02-16 01:18:50.000000000 +0000
+++ pmtools-1.00/pmexp	1999-02-22 17:56:28.000000000 +0000
@@ -8,7 +8,7 @@
 $errors = 0;
 
 for $module (@ARGV) { 
-    eval "require $module";
+    eval "local \$^W = 0; require $module";
     if ($@) {
         $@ =~ s/at \(eval.*$//;
         warn "$0: $@";
diff -ruN pmtools-1.00-history/pmload pmtools-1.00/pmload
--- pmtools-1.00-history/pmload	1999-02-16 01:18:57.000000000 +0000
+++ pmtools-1.00/pmload	1999-02-22 17:56:33.000000000 +0000
@@ -8,7 +8,7 @@
 %seen = %INC;
 
 $module = shift;
-eval "require $module";
+eval "local \$^W = 0; require $module";
 
 if ($@) {
     $@ =~ s/at \(eval.*$//;
diff -ruN pmtools-1.00-history/pmpath pmtools-1.00/pmpath
--- pmtools-1.00-history/pmpath	1999-02-16 01:19:01.000000000 +0000
+++ pmtools-1.00/pmpath	1999-02-22 17:55:54.000000000 +0000
@@ -7,7 +7,7 @@
 $errors = 0;
 
 for $module (@ARGV) {
-    eval "require $module";
+    eval "local \$^W = 0; require $module";
     if ($@) {
 	$@ =~ s/at \(eval.*$//;
 	warn "$0: $@";
diff -ruN pmtools-1.00-history/pmvers pmtools-1.00/pmvers
--- pmtools-1.00-history/pmvers	1999-02-16 01:19:05.000000000 +0000
+++ pmtools-1.00/pmvers	1999-02-22 17:56:41.000000000 +0000
@@ -7,7 +7,7 @@
 $errors = 0;
 
 for $module (@ARGV) {
-    eval "require $module";
+    eval "local \$^W = 0; require $module";
     if ($@) {
 	$@ =~ s/at \(eval.*$//;
 	warn "$0: $@";

pmtools-1.00-pmall.patch:

--- NEW FILE pmtools-1.00-pmall.patch ---
diff -ruN pmtools-1.00/pmall pmtools-1.00-modified/pmall
--- pmtools-1.00/pmall	2005-02-07 01:20:07.045247168 +0000
+++ pmtools-1.00-modified/pmall	2005-02-07 01:21:50.649496928 +0000
@@ -132,7 +132,7 @@
     # This should really use system(), because otherwise we bloat.
     my $mod = shift;
     local $SIG{__WARN__} = sub {};
-    eval "local \$^W = 0; require $module";
+    eval "local \$^W = 0; require $mod";
     if ($@) {
 	warn "Cannot require $mod -- $@\n"
 	    if $opt_v;

pmtools-1.00-pmeth-pman2pmman.patch:

--- NEW FILE pmtools-1.00-pmeth-pman2pmman.patch ---
diff -ruN pmtools-1.00/Makefile.lame pmtools-1.00-modified/Makefile.lame
--- pmtools-1.00/Makefile.lame	1999-02-15 21:40:31.000000000 +0000
+++ pmtools-1.00-modified/Makefile.lame	2004-12-28 20:06:11.745150464 +0000
@@ -1,5 +1,5 @@
 
-PROGRAMS=basepods faqpods modpods pfcat plxload pmall pman pmcat \
+PROGRAMS=basepods faqpods modpods pfcat plxload pmall pmman pmcat \
 	pmdesc pmdirs pmeth pmexp pmfunc pminst pmload pmls pmpath pmvers podgrep \
 	podpath pods podtoc sitepods stdpods
 
diff -ruN pmtools-1.00/Makefile.PL pmtools-1.00-modified/Makefile.PL
--- pmtools-1.00/Makefile.PL	1999-02-16 01:13:35.000000000 +0000
+++ pmtools-1.00-modified/Makefile.PL	2004-12-28 20:00:27.997408064 +0000
@@ -4,8 +4,8 @@
 	NAME => "pmtools",
         DISTNAME => "pmtools",
 	EXE_FILES => [  basepods, faqpods, modpods, pfcat, plxload,
-			pmall, pman, pmcat, pmdesc, pmdirs, pmexp,
-			pmfunc, pminst, pmload, pmls, pmpath, pmvers,
+			pmall, pmcat, pmdesc, pmdirs, pmeth, pmexp,
+			pmfunc, pminst, pmload, pmman, pmls, pmpath, pmvers,
 			podgrep, podpath, pods, podtoc, sitepods,
 			stdpods ],
 	PM => { 'Devel/Loaded.pm' => '$(INST_LIBDIR)/Devel/Loaded.pm' }
diff -ruN pmtools-1.00/MANIFEST pmtools-1.00-modified/MANIFEST
--- pmtools-1.00/MANIFEST	1999-02-16 01:17:15.000000000 +0000
+++ pmtools-1.00-modified/MANIFEST	2004-12-28 20:06:29.068516912 +0000
@@ -10,7 +10,7 @@
 pfcat
 plxload
 pmall
-pman
+pmman
 pmcat
 pmdesc
 pmdirs
diff -ruN pmtools-1.00/pman pmtools-1.00-modified/pman
--- pmtools-1.00/pman	1999-02-16 01:18:39.000000000 +0000
+++ pmtools-1.00-modified/pman	1970-01-01 01:00:00.000000000 +0100
@@ -1,64 +0,0 @@
-#!/usr/bin/env perl
-# pman -- show a module's man page
-# tchrist at perl.com
-
-BEGIN { $^W = 1 }
-BEGIN { die "usage: $0 module ...\n" unless @ARGV }
-
-use FindBin qw($Bin);
-
-$errors = 0;
-
-unless ($pager = $ENV{PAGER}) {
-    require Config;
-    $pager = $Config::Config{"pager"} || "more";
-} 
-
-for $module (@ARGV) { 
-    my $path =  `$Bin/pmpath $module`;
-    if ($?) {
-	$errors++;
-	next;
-    } 
-    chomp $path;
-    system "pod2text $path | $pager";
-    $errors += ($? != 1);
-}
-
-exit($errors != 0);
-
-__END__
-
-=head1 NAME
-
-pman - show a module's man page
-
-=head1 DESCRIPTION
-
-Send a module's pod through pod2text and your pager.
-
-This is mostly here for people too lazy to type
-
-    $ pod2text `pmpath CGI` | $PAGER
-
-=head1 EXAMPLES
-
-    $ pman CGI
-    $ pman Curses
-
-Or running under different versions of Perl: 
-
-    $ oldperl -S pman CGI
-    $ filsperl -S pman Threads
-
-=head1 SEE ALSO
-
-pod2text(1), perlpod(1), pod2man(1), pod2html(1).
-
-=head1 AUTHOR and COPYRIGHT
-
-Copyright (c) 1999 Tom Christiansen
-
-This is free software.  You may modify it and distribute it 
-under Perl's Artistic Licence.  Modified versions must be
-clearly indicated.
diff -ruN pmtools-1.00/pmman pmtools-1.00-modified/pmman
--- pmtools-1.00/pmman	1970-01-01 01:00:00.000000000 +0100
+++ pmtools-1.00-modified/pmman	2004-12-28 20:03:48.054994688 +0000
@@ -0,0 +1,64 @@
+#!/usr/bin/env perl
+# pmman -- show a module's man page
+# tchrist at perl.com
+
+BEGIN { $^W = 1 }
+BEGIN { die "usage: $0 module ...\n" unless @ARGV }
+
+use FindBin qw($Bin);
+
+$errors = 0;
+
+unless ($pager = $ENV{PAGER}) {
+    require Config;
+    $pager = $Config::Config{"pager"} || "more";
+} 
+
+for $module (@ARGV) { 
+    my $path =  `$Bin/pmpath $module`;
+    if ($?) {
+	$errors++;
+	next;
+    } 
+    chomp $path;
+    system "pod2text $path | $pager";
+    $errors += ($? != 1);
+}
+
+exit($errors != 0);
+
+__END__
+
+=head1 NAME
+
+pmman - show a module's man page
+
+=head1 DESCRIPTION
+
+Send a module's pod through pod2text and your pager.
+
+This is mostly here for people too lazy to type
+
+    $ pod2text `pmpath CGI` | $PAGER
+
+=head1 EXAMPLES
+
+    $ pmman CGI
+    $ pmman Curses
+
+Or running under different versions of Perl: 
+
+    $ oldperl -S pmman CGI
+    $ filsperl -S pmman Threads
+
+=head1 SEE ALSO
+
+pod2text(1), perlpod(1), pod2man(1), pod2html(1).
+
+=head1 AUTHOR and COPYRIGHT
+
+Copyright (c) 1999 Tom Christiansen
+
+This is free software.  You may modify it and distribute it 
+under Perl's Artistic Licence.  Modified versions must be
+clearly indicated.
diff -ruN pmtools-1.00/README pmtools-1.00-modified/README
--- pmtools-1.00/README	1999-02-16 01:18:08.000000000 +0000
+++ pmtools-1.00-modified/README	2004-12-28 20:01:27.751324088 +0000
@@ -383,10 +383,10 @@
 
 =========================================================
 
-pman - show the module's pod docs
+pmman - show the module's pod docs
 
-    $ pman CGI
-    $ pman Curses
+    $ pmman CGI
+    $ pmman Curses
 
 This is mostly here for people too lazy to type
     $ pod2text `pmpath CGI` | more


Index: .cvsignore
===================================================================
RCS file: /cvs/extras/rpms/perl-pmtools/devel/.cvsignore,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- .cvsignore	17 Mar 2005 02:05:37 -0000	1.1
+++ .cvsignore	17 Mar 2005 02:06:20 -0000	1.2
@@ -0,0 +1 @@
+pmtools-1.00.tar.gz


Index: sources
===================================================================
RCS file: /cvs/extras/rpms/perl-pmtools/devel/sources,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- sources	17 Mar 2005 02:05:37 -0000	1.1
+++ sources	17 Mar 2005 02:06:20 -0000	1.2
@@ -0,0 +1 @@
+88ee58113ac3d513d94f81f9fdfaeb00  pmtools-1.00.tar.gz




More information about the fedora-extras-commits mailing list