File: fix_example_shebangs.patch

package info (click to toggle)
libarchive-zip-perl 1.68-1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye, sid
  • size: 912 kB
  • sloc: perl: 5,832; makefile: 2
file content (103 lines) | stat: -rw-r--r-- 2,706 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
Description: The module provides several example scripts written in Perl
 that have missing or incorrect shebang lines. This patch adds or changes
 shebangs to #!/usr/bin/perl in order to comply with Debian Policy.
Bug-Debian: https://bugs.debian.org/543659
Forwarded: not-needed
Author: Ernesto Hernández-Novich <emhn@usb.ve>
Reviewed-by: gregor herrmann <gregoa@debian.org>
Last-Update: 2014-10-22

--- a/examples/calcSizes.pl
+++ b/examples/calcSizes.pl
@@ -1,3 +1,4 @@
+#!/usr/bin/perl
 # Example of how to compute compressed sizes
 # $Revision: 1.2 $
 use strict;
--- a/examples/copy.pl
+++ b/examples/copy.pl
@@ -1,3 +1,4 @@
+#!/usr/bin/perl
 # Copies a zip file to another.
 # Usage:
 # perl copy.pl input.zip output.zip
--- a/examples/extract.pl
+++ b/examples/extract.pl
@@ -1,4 +1,4 @@
-#!/bin/perl -w
+#!/usr/bin/perl -w
 # Extracts the named files into 'extractTest' subdir
 # usage:
 #	perl extract.pl [-j] zipfile.zip filename [...]
--- a/examples/mfh.pl
+++ b/examples/mfh.pl
@@ -1,3 +1,4 @@
+#!/usr/bin/perl
 # Prints messages on every chunk write.
 # Usage:
 # perl mfh.pl zipfile.zip
--- a/examples/selfex.pl
+++ b/examples/selfex.pl
@@ -44,7 +44,7 @@ $fh->close();
 
 # below the __DATA__ line is the extraction stub:
 __DATA__
-#!/usr/local/bin/perl
+#!/usr/bin/perl
 # Self-extracting Zip file extraction stub
 # Copyright (C) 2002 Ned Konz
 
--- a/examples/unzipAll.pl
+++ b/examples/unzipAll.pl
@@ -1,4 +1,4 @@
-#!/bin/perl -w
+#!/usr/bin/perl -w
 # Extracts all files from the given zip
 # $Revision: 1.3 $
 # usage:
--- a/examples/updateTree.pl
+++ b/examples/updateTree.pl
@@ -1,3 +1,4 @@
+#!/usr/bin/perl
 # Shows how to update a Zip in place using a temp file.
 #
 # usage:
--- a/examples/updateZip.pl
+++ b/examples/updateZip.pl
@@ -1,3 +1,4 @@
+#!/usr/bin/perl
 # Shows how to update a Zip in place using a temp file.
 # $Revision: 1.1 $
 #
--- a/examples/zipcheck.pl
+++ b/examples/zipcheck.pl
@@ -1,4 +1,4 @@
-#!/bin/perl -w
+#!/usr/bin/perl -w
 # usage: valid zipname.zip
 # exits with non-zero status if invalid zip
 # status = 1: invalid arguments
--- a/examples/zipinfo.pl
+++ b/examples/zipinfo.pl
@@ -1,4 +1,4 @@
-#! /usr/bin/perl -w
+#!/usr/bin/perl -w
 # Print out information about a ZIP file.
 # Note that this buffers the entire file into memory!
 # usage:
--- a/examples/zip.pl
+++ b/examples/zip.pl
@@ -1,4 +1,4 @@
-#!/bin/perl -w
+#!/usr/bin/perl -w
 # Creates a zip file, adding the given directories and files.
 # Usage:
 #	perl zip.pl zipfile.zip file [...]
--- a/examples/ziptest.pl
+++ b/examples/ziptest.pl
@@ -1,4 +1,4 @@
-#!/bin/perl -w
+#!/usr/bin/perl -w
 # $Revision: 1.7 $
 # Lists the zipfile given as a first argument and tests CRC's.
 # Usage: