~ubuntu-branches/ubuntu/trusty/pdl/trusty-proposed

« back to all changes in this revision

Viewing changes to debian/patches/40-Doc-scantree-exclude-index.dpatch

  • Committer: Bazaar Package Importer
  • Author(s): Andres Rodriguez
  • Date: 2009-12-05 12:37:41 UTC
  • mfrom: (2.1.4 squeeze)
  • Revision ID: james.westby@ubuntu.com-20091205123741-ilqkc9s4zlk71z13
Tags: 1:2.4.5+dfsg-2ubuntu1
* Merge from debian testing (LP: #492898), remaining changes:
  - debian/perldl.conf: Enabled NAN support.

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
#! /bin/sh /usr/share/dpatch/dpatch-run
 
2
## 40-Doc-scantree-exclude-index.dpatch by  <glaweh@debian.org>
 
3
##
 
4
## All lines beginning with `## DP:' are a description of the patch.
 
5
## DP: No description.
 
6
 
 
7
@DPATCH@
 
8
diff -urNad pdl-2.4.5+dfsg~/Doc/Doc.pm pdl-2.4.5+dfsg/Doc/Doc.pm
 
9
--- pdl-2.4.5+dfsg~/Doc/Doc.pm  2009-10-17 21:37:41.000000000 +0000
 
10
+++ pdl-2.4.5+dfsg/Doc/Doc.pm   2009-11-06 21:14:05.287078238 +0000
 
11
@@ -688,8 +688,9 @@
 
12
   my $sub = sub { if (($File::Find::name =~ /[.]pm$/ &&
 
13
                      $File::Find::name !~ /PP.pm/ &&
 
14
                      $File::Find::name !~ m|Pod/Parser.pm| &&
 
15
-                     $File::Find::dir !~ m#/PP|/Gen#) or
 
16
-                      $File::Find::name =~ /[.]pod$/){
 
17
+                     $File::Find::dir !~ m#/PP|/Gen#) or (
 
18
+                      $File::Find::name =~ /[.]pod$/ && 
 
19
+                       $File::Find::name !~ /Index[.]pod$/)){
 
20
        printf "%-20s", $_.'...';
 
21
        my $n = $this->scan($File::Find::name,$verbose); # bind $this lexically
 
22
        print "\t$n functions\n";