[med-svn] r9859 - trunk/packages/bioperl/trunk/debian/patches

[olivier sallou]

Author: osallou-guest
Date: 2012-03-02 12:21:48 +0000 (Fri, 02 Mar 2012)
New Revision: 9859

Added:
   trunk/packages/bioperl/trunk/debian/patches/fix_examples_perl_location
Log:
fix perl path in examples

Added: trunk/packages/bioperl/trunk/debian/patches/fix_examples_perl_location
===================================================================
--- trunk/packages/bioperl/trunk/debian/patches/fix_examples_perl_location	                        (rev 0)
+++ trunk/packages/bioperl/trunk/debian/patches/fix_examples_perl_location	2012-03-02 12:21:48 UTC (rev 9859)
@@ -0,0 +1,60 @@
+Subject: fix perl location
+Description: wrong shebang perl location
+Author: Olivier Sallou <osallou at debian.org>
+Last-Updated: 02/03/2012
+--- a/examples/db/getGenBank.pl
++++ b/examples/db/getGenBank.pl
+@@ -1,4 +1,4 @@
+-#!/usr/local/bin/perl
++#!/usr/bin/perl
+ #
+ # How to retrieve GenBank entries over the Web
+ #
+--- a/examples/db/get_seqs.pl
++++ b/examples/db/get_seqs.pl
+@@ -1,4 +1,4 @@
+-#!/usr/local/bin/perl
++#!/usr/bin/perl
+ use strict;
+ use vars qw($USAGE);
+ use Carp;
+--- a/examples/generate_random_seq.pl
++++ b/examples/generate_random_seq.pl
+@@ -1,4 +1,4 @@
+-#!/bin/perl
++#!/usr/bin/perl
+ use strict;
+ use vars qw($USAGE);
+ 
+--- a/examples/searchio/psiblast_features.pl
++++ b/examples/searchio/psiblast_features.pl
+@@ -1,4 +1,4 @@
+-#!/usr/local/bin/perl 
++#!/usr/bin/perl
+ 
+ # Example usage of a SearchIO::psiblast parser of traditional format Blast 
+ # and PSI-Blast reports.
+--- a/examples/structure/structure-io.pl
++++ b/examples/structure/structure-io.pl
+@@ -1,4 +1,4 @@
+-#!/bin/perl
++#!/usr/bin/perl
+ # Getting  Entry, Chain, Residue, and Atom objects given a PDB file
+ 
+ use Bio::Structure::IO;
+--- a/examples/tk/hitdisplay.pl
++++ b/examples/tk/hitdisplay.pl
+@@ -1,4 +1,4 @@
+-#!/usr/local/bin/perl
++#!/usr/bin/perl
+ #
+ # PROGRAM  : hitdisplay.pl
+ # PURPOSE  : Demonstrate Bio::Tk::HitDisplay
+--- a/examples/tools/gb_to_gff.pl
++++ b/examples/tools/gb_to_gff.pl
+@@ -1,4 +1,4 @@
+-#!/usr/local/bin/perl
++#!/usr/bin/perl
+ use strict;
+ 
+ use Bio::Tools::GFF;