]> git.pld-linux.org Git - packages/ImageMagick.git/blame - ImageMagick-perlpaths.patch
- update to 6.1.8-9 to address CAN-2005-0005
[packages/ImageMagick.git] / ImageMagick-perlpaths.patch
CommitLineData
ab434fc9 1diff -Naur ImageMagick-5.5.6.orig/PerlMagick/demo/annotate.pl ImageMagick-5.5.6/PerlMagick/demo/annotate.pl
2--- ImageMagick-5.5.6.orig/PerlMagick/demo/annotate.pl Sat Jun 14 17:16:03 2003
3+++ ImageMagick-5.5.6/PerlMagick/demo/annotate.pl Sat Jun 14 17:49:46 2003
4@@ -1,4 +1,4 @@
5-#!/usr/local/bin/perl
6+#!/usr/bin/perl
7
8 use Image::Magick;
9
10diff -Naur ImageMagick-5.5.6.orig/PerlMagick/demo/button.pl ImageMagick-5.5.6/PerlMagick/demo/button.pl
11--- ImageMagick-5.5.6.orig/PerlMagick/demo/button.pl Sat Jun 14 17:16:03 2003
12+++ ImageMagick-5.5.6/PerlMagick/demo/button.pl Sat Jun 14 17:48:48 2003
41054103 13@@ -1,4 +1,4 @@
14-#!/usr/local/bin/perl
15+#!/usr/bin/perl
16 #
17 # Make simple beveled button.
18 #
ab434fc9 19diff -Naur ImageMagick-5.5.6.orig/PerlMagick/demo/composite.pl ImageMagick-5.5.6/PerlMagick/demo/composite.pl
20--- ImageMagick-5.5.6.orig/PerlMagick/demo/composite.pl Sat Jun 14 17:16:03 2003
21+++ ImageMagick-5.5.6/PerlMagick/demo/composite.pl Sat Jun 14 17:49:46 2003
22@@ -1,4 +1,4 @@
23-#!/usr/local/bin/perl
24+#!/usr/bin/perl
25
26 use Image::Magick;
27
28diff -Naur ImageMagick-5.5.6.orig/PerlMagick/demo/demo.pl ImageMagick-5.5.6/PerlMagick/demo/demo.pl
29--- ImageMagick-5.5.6.orig/PerlMagick/demo/demo.pl Sat Jun 14 17:16:03 2003
30+++ ImageMagick-5.5.6/PerlMagick/demo/demo.pl Sat Jun 14 17:48:48 2003
41054103 31@@ -1,4 +1,4 @@
32-#!/usr/local/bin/perl
33+#!/usr/bin/perl
34 #
35 # Overall demo of the major PerlMagick methods.
36 #
ab434fc9 37diff -Naur ImageMagick-5.5.6.orig/PerlMagick/demo/lsys.pl ImageMagick-5.5.6/PerlMagick/demo/lsys.pl
38--- ImageMagick-5.5.6.orig/PerlMagick/demo/lsys.pl Sat Jun 14 17:16:03 2003
39+++ ImageMagick-5.5.6/PerlMagick/demo/lsys.pl Sat Jun 14 17:48:48 2003
41054103 40@@ -1,4 +1,4 @@
41-#!/usr/local/bin/perl
42+#!/usr/bin/perl
43
44 # Written by jreed@itis.com, adapted by John Cristy.
45
ab434fc9 46diff -Naur ImageMagick-5.5.6.orig/PerlMagick/demo/piddle.pl ImageMagick-5.5.6/PerlMagick/demo/piddle.pl
47--- ImageMagick-5.5.6.orig/PerlMagick/demo/piddle.pl Sat Jun 14 17:16:03 2003
48+++ ImageMagick-5.5.6/PerlMagick/demo/piddle.pl Sat Jun 14 17:48:48 2003
41054103 49@@ -1,4 +1,4 @@
50-#!/usr/local/bin/perl
51+#!/usr/bin/perl
52 # Piddle example using PerlMagick methods.
53
54 use Image::Magick;
ab434fc9 55diff -Naur ImageMagick-5.5.6.orig/PerlMagick/demo/shadow_text.pl ImageMagick-5.5.6/PerlMagick/demo/shadow_text.pl
56--- ImageMagick-5.5.6.orig/PerlMagick/demo/shadow_text.pl Sat Jun 14 17:16:03 2003
57+++ ImageMagick-5.5.6/PerlMagick/demo/shadow_text.pl Sat Jun 14 17:48:48 2003
41054103 58@@ -1,4 +1,4 @@
59-#!/usr/local/bin/perl
60+#!/usr/bin/perl
61 #
62 # Make simple text with a shadow.
63 #
ab434fc9 64diff -Naur ImageMagick-5.5.6.orig/PerlMagick/demo/shapes.pl ImageMagick-5.5.6/PerlMagick/demo/shapes.pl
65--- ImageMagick-5.5.6.orig/PerlMagick/demo/shapes.pl Sat Jun 14 17:16:03 2003
66+++ ImageMagick-5.5.6/PerlMagick/demo/shapes.pl Sat Jun 14 17:48:48 2003
41054103 67@@ -1,4 +1,4 @@
68-#!/usr/local/bin/perl
69+#!/usr/bin/perl
70 # GD example using PerlMagick methods.
71
72 use Image::Magick;
ab434fc9 73diff -Naur ImageMagick-5.5.6.orig/PerlMagick/demo/steganography.pl ImageMagick-5.5.6/PerlMagick/demo/steganography.pl
74--- ImageMagick-5.5.6.orig/PerlMagick/demo/steganography.pl Sat Jun 14 17:16:03 2003
75+++ ImageMagick-5.5.6/PerlMagick/demo/steganography.pl Sat Jun 14 17:48:48 2003
41054103 76@@ -1,4 +1,4 @@
77-#!/usr/local/bin/perl
78+#!/usr/bin/perl
79
80 use Image::Magick;
81
ab434fc9 82diff -Naur ImageMagick-5.5.6.orig/PerlMagick/demo/tree.pl ImageMagick-5.5.6/PerlMagick/demo/tree.pl
83--- ImageMagick-5.5.6.orig/PerlMagick/demo/tree.pl Sat Jun 14 17:16:03 2003
84+++ ImageMagick-5.5.6/PerlMagick/demo/tree.pl Sat Jun 14 17:48:48 2003
41054103 85@@ -1,4 +1,4 @@
86-#!/usr/local/bin/perl
87+#!/usr/bin/perl
88 require "lsys.pl";
89
90 %rule = (
4c6476b7
JB
91diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/blob.t ImageMagick-5.5.7/PerlMagick/t/blob.t
92--- ImageMagick-5.5.7.orig/PerlMagick/t/blob.t Sat Jun 14 17:16:03 2003
93+++ ImageMagick-5.5.7/PerlMagick/t/blob.t Sat Jun 14 17:49:46 2003
94@@ -1,4 +1,4 @@
95-#!/usr/local/bin/perl\r
96+#!/usr/bin/perl\r
97 #\r
98 # Test image blobs.\r
99 #\r
100diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/bzlib/read.t ImageMagick-5.5.7/PerlMagick/t/bzlib/read.t
101--- ImageMagick-5.5.7.orig/PerlMagick/t/bzlib/read.t Sat Jun 14 17:16:03 2003
102+++ ImageMagick-5.5.7/PerlMagick/t/bzlib/read.t Sat Jun 14 17:49:46 2003
103@@ -1,4 +1,4 @@
104-#!/usr/local/bin/perl\r
105+#!/usr/bin/perl\r
106 #\r
107 # Test reading an image which uses BZip compression\r
108 #\r
109diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/bzlib/write.t ImageMagick-5.5.7/PerlMagick/t/bzlib/write.t
110--- ImageMagick-5.5.7.orig/PerlMagick/t/bzlib/write.t Sat Jun 14 17:16:03 2003
111+++ ImageMagick-5.5.7/PerlMagick/t/bzlib/write.t Sat Jun 14 17:49:46 2003
112@@ -1,4 +1,4 @@
113-#!/usr/local/bin/perl\r
114+#!/usr/bin/perl\r
115 #\r
116 # Test writing files using bzlib-based compression\r
117 #\r
118diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/cgm/read.t ImageMagick-5.5.7/PerlMagick/t/cgm/read.t
119--- ImageMagick-5.5.7.orig/PerlMagick/t/cgm/read.t Sat Jun 14 17:16:03 2003
120+++ ImageMagick-5.5.7/PerlMagick/t/cgm/read.t Sat Jun 14 17:49:46 2003
121@@ -1,4 +1,4 @@
122-#!/usr/local/bin/perl\r
123+#!/usr/bin/perl\r
124 #\r
125 # Test reading CGM files\r
126 #\r
127diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/filter.t ImageMagick-5.5.7/PerlMagick/t/filter.t
128--- ImageMagick-5.5.7.orig/PerlMagick/t/filter.t Sat Jun 14 17:16:03 2003
129+++ ImageMagick-5.5.7/PerlMagick/t/filter.t Sat Jun 14 17:49:46 2003
130@@ -1,4 +1,4 @@
131-#!/usr/local/bin/perl\r
132+#!/usr/bin/perl\r
133 #\r
134 # Test image filter.\r
135 #\r
136diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/fpx/read.t ImageMagick-5.5.7/PerlMagick/t/fpx/read.t
137--- ImageMagick-5.5.7.orig/PerlMagick/t/fpx/read.t Sat Jun 14 17:16:03 2003
138+++ ImageMagick-5.5.7/PerlMagick/t/fpx/read.t Sat Jun 14 17:49:46 2003
139@@ -1,4 +1,4 @@
140-#!/usr/local/bin/perl\r
141+#!/usr/bin/perl\r
142 #\r
143 # Test reading FPX images\r
144 #\r
145diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/fpx/write.t ImageMagick-5.5.7/PerlMagick/t/fpx/write.t
146--- ImageMagick-5.5.7.orig/PerlMagick/t/fpx/write.t Sat Jun 14 17:16:03 2003
147+++ ImageMagick-5.5.7/PerlMagick/t/fpx/write.t Sat Jun 14 17:49:46 2003
148@@ -1,4 +1,4 @@
149-#!/usr/local/bin/perl\r
150+#!/usr/bin/perl\r
151 #\r
152 # Test writing FPX images\r
153 #\r
154diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/getattribute.t ImageMagick-5.5.7/PerlMagick/t/getattribute.t
155--- ImageMagick-5.5.7.orig/PerlMagick/t/getattribute.t Sat Jun 14 17:16:03 2003
156+++ ImageMagick-5.5.7/PerlMagick/t/getattribute.t Sat Jun 14 17:49:46 2003
157@@ -1,4 +1,4 @@
158-#!/usr/local/bin/perl\r
159+#!/usr/bin/perl\r
160 #\r
161 # Test getting attributes.\r
162 #\r
163diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/hdf/read.t ImageMagick-5.5.7/PerlMagick/t/hdf/read.t
164--- ImageMagick-5.5.7.orig/PerlMagick/t/hdf/read.t Sat Jun 14 17:16:03 2003
165+++ ImageMagick-5.5.7/PerlMagick/t/hdf/read.t Sat Jun 14 17:49:46 2003
166@@ -1,4 +1,4 @@
167-#!/usr/local/bin/perl\r
168+#!/usr/bin/perl\r
169 #\r
170 # Test reading HDF images\r
171 #\r
172diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/hdf/write.t ImageMagick-5.5.7/PerlMagick/t/hdf/write.t
173--- ImageMagick-5.5.7.orig/PerlMagick/t/hdf/write.t Sat Jun 14 17:16:03 2003
174+++ ImageMagick-5.5.7/PerlMagick/t/hdf/write.t Sat Jun 14 17:49:46 2003
175@@ -1,4 +1,4 @@
176-#!/usr/local/bin/perl\r
177+#!/usr/bin/perl\r
178 #\r
179 # Test writing HDF images\r
180 #\r
181diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/hpgl/read.t ImageMagick-5.5.7/PerlMagick/t/hpgl/read.t
182--- ImageMagick-5.5.7.orig/PerlMagick/t/hpgl/read.t Sat Jun 14 17:16:03 2003
183+++ ImageMagick-5.5.7/PerlMagick/t/hpgl/read.t Sat Jun 14 17:49:46 2003
184@@ -1,4 +1,4 @@
185-#!/usr/local/bin/perl\r
186+#!/usr/bin/perl\r
187 #\r
188 # Test Reading HP GL images\r
189 #\r
190diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/jbig/read.t ImageMagick-5.5.7/PerlMagick/t/jbig/read.t
191--- ImageMagick-5.5.7.orig/PerlMagick/t/jbig/read.t Sat Jun 14 17:16:03 2003
192+++ ImageMagick-5.5.7/PerlMagick/t/jbig/read.t Sat Jun 14 17:49:46 2003
193@@ -1,4 +1,4 @@
194-#!/usr/local/bin/perl\r
195+#!/usr/bin/perl\r
196 #\r
197 # Test read image method on JBIG image\r
198 #\r
199diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/jbig/write.t ImageMagick-5.5.7/PerlMagick/t/jbig/write.t
200--- ImageMagick-5.5.7.orig/PerlMagick/t/jbig/write.t Sat Jun 14 17:16:03 2003
201+++ ImageMagick-5.5.7/PerlMagick/t/jbig/write.t Sat Jun 14 17:49:46 2003
202@@ -1,4 +1,4 @@
203-#!/usr/local/bin/perl\r
204+#!/usr/bin/perl\r
205 #\r
206 # Test write image method on JBIG image\r
207 #\r
208diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/jpeg/read.t ImageMagick-5.5.7/PerlMagick/t/jpeg/read.t
209--- ImageMagick-5.5.7.orig/PerlMagick/t/jpeg/read.t Sat Jun 14 17:16:03 2003
210+++ ImageMagick-5.5.7/PerlMagick/t/jpeg/read.t Sat Jun 14 17:49:46 2003
211@@ -1,4 +1,4 @@
212-#!/usr/local/bin/perl\r
213+#!/usr/bin/perl\r
214 #\r
215 # Test read image method on non-interlaced JPEG.\r
216 #\r
217diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/jpeg/write.t ImageMagick-5.5.7/PerlMagick/t/jpeg/write.t
218--- ImageMagick-5.5.7.orig/PerlMagick/t/jpeg/write.t Sat Jun 14 17:16:03 2003
219+++ ImageMagick-5.5.7/PerlMagick/t/jpeg/write.t Sat Jun 14 17:49:46 2003
220@@ -1,4 +1,4 @@
221-#!/usr/local/bin/perl\r
222+#!/usr/bin/perl\r
223 #\r
224 # Test reading JPEG images\r
225 #\r
226diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/montage.t ImageMagick-5.5.7/PerlMagick/t/montage.t
227--- ImageMagick-5.5.7.orig/PerlMagick/t/montage.t Sat Jun 14 17:16:03 2003
228+++ ImageMagick-5.5.7/PerlMagick/t/montage.t Sat Jun 14 17:49:46 2003
229@@ -1,4 +1,4 @@
230-#!/usr/local/bin/perl\r
231+#!/usr/bin/perl\r
232 #\r
233 # Test montage method.\r
234 #\r
235diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/mpeg/read.t ImageMagick-5.5.7/PerlMagick/t/mpeg/read.t
236--- ImageMagick-5.5.7.orig/PerlMagick/t/mpeg/read.t Sat Jun 14 17:16:03 2003
237+++ ImageMagick-5.5.7/PerlMagick/t/mpeg/read.t Sat Jun 14 17:49:46 2003
238@@ -1,4 +1,4 @@
239-#!/usr/local/bin/perl\r
240+#!/usr/bin/perl\r
241 #\r
242 # Test reading MPEG files\r
243 #\r
244diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/png/read-16.t ImageMagick-5.5.7/PerlMagick/t/png/read-16.t
245--- ImageMagick-5.5.7.orig/PerlMagick/t/png/read-16.t Sat Jun 14 17:16:03 2003
246+++ ImageMagick-5.5.7/PerlMagick/t/png/read-16.t Sat Jun 14 17:49:46 2003
247@@ -1,4 +1,4 @@
248-#!/usr/local/bin/perl\r
249+#!/usr/bin/perl\r
250 #\r
251 # Test reading PNG images when 16bit support is enabled\r
252 #\r
253diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/png/read.t ImageMagick-5.5.7/PerlMagick/t/png/read.t
254--- ImageMagick-5.5.7.orig/PerlMagick/t/png/read.t Sat Jun 14 17:16:03 2003
255+++ ImageMagick-5.5.7/PerlMagick/t/png/read.t Sat Jun 14 17:49:46 2003
256@@ -1,4 +1,4 @@
257-#!/usr/local/bin/perl\r
258+#!/usr/bin/perl\r
259 #\r
260 # Test reading PNG images\r
261 #\r
262diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/png/write-16.t ImageMagick-5.5.7/PerlMagick/t/png/write-16.t
263--- ImageMagick-5.5.7.orig/PerlMagick/t/png/write-16.t Sat Jun 14 17:16:03 2003
264+++ ImageMagick-5.5.7/PerlMagick/t/png/write-16.t Sat Jun 14 17:49:46 2003
265@@ -1,4 +1,4 @@
266-#!/usr/local/bin/perl\r
267+#!/usr/bin/perl\r
268 #\r
269 # Test writing PNG images when 16bit support is enabled\r
270 #\r
271diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/png/write.t ImageMagick-5.5.7/PerlMagick/t/png/write.t
272--- ImageMagick-5.5.7.orig/PerlMagick/t/png/write.t Sat Jun 14 17:16:03 2003
273+++ ImageMagick-5.5.7/PerlMagick/t/png/write.t Sat Jun 14 17:49:46 2003
274@@ -1,4 +1,4 @@
275-#!/usr/local/bin/perl\r
276+#!/usr/bin/perl\r
277 #\r
278 # Test writing PNG images\r
279 #\r
280diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/ps/read.t ImageMagick-5.5.7/PerlMagick/t/ps/read.t
281--- ImageMagick-5.5.7.orig/PerlMagick/t/ps/read.t Sat Jun 14 17:16:03 2003
282+++ ImageMagick-5.5.7/PerlMagick/t/ps/read.t Sat Jun 14 17:49:46 2003
283@@ -1,4 +1,4 @@
284-#!/usr/local/bin/perl\r
285+#!/usr/bin/perl\r
286 #\r
287 # Test Reading Postscript images\r
288 #\r
289diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/ps/write.t ImageMagick-5.5.7/PerlMagick/t/ps/write.t
290--- ImageMagick-5.5.7.orig/PerlMagick/t/ps/write.t Sat Jun 14 17:16:03 2003
291+++ ImageMagick-5.5.7/PerlMagick/t/ps/write.t Sat Jun 14 17:49:46 2003
292@@ -1,4 +1,4 @@
293-#!/usr/local/bin/perl\r
294+#!/usr/bin/perl\r
295 #\r
296 # Test writing Postscript images\r
297 #\r
298diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/rad/read.t ImageMagick-5.5.7/PerlMagick/t/rad/read.t
299--- ImageMagick-5.5.7.orig/PerlMagick/t/rad/read.t Sat Jun 14 17:16:03 2003
300+++ ImageMagick-5.5.7/PerlMagick/t/rad/read.t Sat Jun 14 17:49:46 2003
301@@ -1,4 +1,4 @@
302-#!/usr/local/bin/perl\r
303+#!/usr/bin/perl\r
304 #\r
305 # Test reading Radiance file format\r
306 #\r
307diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/rad/write.t ImageMagick-5.5.7/PerlMagick/t/rad/write.t
308--- ImageMagick-5.5.7.orig/PerlMagick/t/rad/write.t Sat Jun 14 17:16:03 2003
309+++ ImageMagick-5.5.7/PerlMagick/t/rad/write.t Sat Jun 14 17:49:46 2003
310@@ -1,4 +1,4 @@
311-#!/usr/local/bin/perl\r
312+#!/usr/bin/perl\r
313 #\r
314 # Test writing Radiance file format\r
315 #\r
316diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/read.t ImageMagick-5.5.7/PerlMagick/t/read.t
317--- ImageMagick-5.5.7.orig/PerlMagick/t/read.t Sat Jun 14 17:16:03 2003
318+++ ImageMagick-5.5.7/PerlMagick/t/read.t Sat Jun 14 17:49:46 2003
319@@ -1,4 +1,4 @@
320-#!/usr/local/bin/perl\r
321+#!/usr/bin/perl\r
322 #\r
323 # Test reading formats supported directly by ImageMagick\r
324 #\r
325diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/setattribute.t ImageMagick-5.5.7/PerlMagick/t/setattribute.t
326--- ImageMagick-5.5.7.orig/PerlMagick/t/setattribute.t Sat Jun 14 17:16:03 2003
327+++ ImageMagick-5.5.7/PerlMagick/t/setattribute.t Sat Jun 14 17:49:46 2003
328@@ -1,4 +1,4 @@
329-#!/usr/local/bin/perl\r
330+#!/usr/bin/perl\r
331 #\r
332 # Test setting & getting attributes.\r
333 #\r
334diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/tiff/read.t ImageMagick-5.5.7/PerlMagick/t/tiff/read.t
335--- ImageMagick-5.5.7.orig/PerlMagick/t/tiff/read.t Sat Jun 14 17:16:03 2003
336+++ ImageMagick-5.5.7/PerlMagick/t/tiff/read.t Sat Jun 14 17:49:46 2003
337@@ -1,4 +1,4 @@
338-#!/usr/local/bin/perl\r
339+#!/usr/bin/perl\r
340 #\r
341 # Test reading TIFF images\r
342 #\r
343diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/tiff/write.t ImageMagick-5.5.7/PerlMagick/t/tiff/write.t
344--- ImageMagick-5.5.7.orig/PerlMagick/t/tiff/write.t Sat Jun 14 17:16:03 2003
345+++ ImageMagick-5.5.7/PerlMagick/t/tiff/write.t Sat Jun 14 17:49:46 2003
346@@ -1,4 +1,4 @@
347-#!/usr/local/bin/perl\r
348+#!/usr/bin/perl\r
349 #\r
350 # Test writing TIFF images\r
351 #\r
352diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/ttf/read.t ImageMagick-5.5.7/PerlMagick/t/ttf/read.t
353--- ImageMagick-5.5.7.orig/PerlMagick/t/ttf/read.t Sat Jun 14 17:16:03 2003
354+++ ImageMagick-5.5.7/PerlMagick/t/ttf/read.t Sat Jun 14 17:49:46 2003
ab434fc9 355@@ -1,4 +1,4 @@
356-#!/usr/local/bin/perl
357+#!/usr/bin/perl
358 #
359 # Test read image method on TrueType font
360 #
4c6476b7
JB
361diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/wmf/read.t ImageMagick-5.5.7/PerlMagick/t/wmf/read.t
362--- ImageMagick-5.5.7.orig/PerlMagick/t/wmf/read.t Sat Jun 14 17:16:03 2003
363+++ ImageMagick-5.5.7/PerlMagick/t/wmf/read.t Sat Jun 14 17:49:46 2003
364@@ -1,4 +1,4 @@
365-#!/usr/local/bin/perl\r
366+#!/usr/bin/perl\r
367 #\r
368 # Test reading WMF files\r
369 #\r
370diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/write.t ImageMagick-5.5.7/PerlMagick/t/write.t
371--- ImageMagick-5.5.7.orig/PerlMagick/t/write.t Sat Jun 14 17:16:03 2003
372+++ ImageMagick-5.5.7/PerlMagick/t/write.t Sat Jun 14 17:49:46 2003
373@@ -1,4 +1,4 @@
374-#!/usr/local/bin/perl\r
375+#!/usr/bin/perl\r
376 #\r
377 # Test writing formats supported directly by ImageMagick\r
378 #\r
379diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/x/read.t ImageMagick-5.5.7/PerlMagick/t/x/read.t
380--- ImageMagick-5.5.7.orig/PerlMagick/t/x/read.t Sat Jun 14 17:16:03 2003
381+++ ImageMagick-5.5.7/PerlMagick/t/x/read.t Sat Jun 14 17:49:46 2003
382@@ -1,4 +1,4 @@
383-#!/usr/local/bin/perl\r
384+#!/usr/bin/perl\r
385 #\r
386 # Test accessing X11 server\r
387 #\r
388diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/x/write.t ImageMagick-5.5.7/PerlMagick/t/x/write.t
389--- ImageMagick-5.5.7.orig/PerlMagick/t/x/write.t Sat Jun 14 17:16:03 2003
390+++ ImageMagick-5.5.7/PerlMagick/t/x/write.t Sat Jun 14 17:49:46 2003
391@@ -1,4 +1,4 @@
392-#!/usr/local/bin/perl\r
393+#!/usr/bin/perl\r
394 #\r
395 # Test accessing X11 server\r
396 #\r
397diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/xfig/read.t ImageMagick-5.5.7/PerlMagick/t/xfig/read.t
398--- ImageMagick-5.5.7.orig/PerlMagick/t/xfig/read.t Sat Jun 14 17:16:03 2003
399+++ ImageMagick-5.5.7/PerlMagick/t/xfig/read.t Sat Jun 14 17:49:46 2003
400@@ -1,4 +1,4 @@
401-#!/usr/local/bin/perl\r
402+#!/usr/bin/perl\r
403 #\r
404 # Test Reading Xfig files\r
405 #\r
406diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/zlib/read.t ImageMagick-5.5.7/PerlMagick/t/zlib/read.t
407--- ImageMagick-5.5.7.orig/PerlMagick/t/zlib/read.t Sat Jun 14 17:16:03 2003
408+++ ImageMagick-5.5.7/PerlMagick/t/zlib/read.t Sat Jun 14 17:49:46 2003
409@@ -1,4 +1,4 @@
410-#!/usr/local/bin/perl\r
411+#!/usr/bin/perl\r
412 #\r
413 # Test reading an image which uses Zip compression\r
414 #\r
415diff -Naur ImageMagick-5.5.7.orig/PerlMagick/t/zlib/write.t ImageMagick-5.5.7/PerlMagick/t/zlib/write.t
416--- ImageMagick-5.5.7.orig/PerlMagick/t/zlib/write.t Sat Jun 14 17:16:03 2003
417+++ ImageMagick-5.5.7/PerlMagick/t/zlib/write.t Sat Jun 14 17:49:46 2003
418@@ -1,4 +1,4 @@
419-#!/usr/local/bin/perl\r
420+#!/usr/bin/perl\r
421 #\r
422 # Test writing files using zlib-based compression\r
423 #\r
424--- ImageMagick-5.5.7/www/perl.html.orig 2003-05-12 05:13:02.000000000 +0200
425+++ ImageMagick-5.5.7/www/perl.html 2003-07-18 08:37:34.000000000 +0200
426@@ -166,11 +166,11 @@
427 <p>
428
429 <pre>
430- #!/usr/local/bin/perl<br> use Image::Magick;<br><br> my($image, $x);<br><br> $image = Image::Magick-&gt;new;<br> $x = $image-&gt;Read('girl.png', 'logo.png', 'rose.png');<br> warn "$x" if "$x";<br><br> $x = $image-&gt;Crop(geometry=&gt;'100x100"+100"+100');<br> warn "$x" if "$x";<br><br> $x = $image-&gt;Write('x.png');<br> warn "$x" if "$x";
431+ #!/usr/bin/perl<br> use Image::Magick;<br><br> my($image, $x);<br><br> $image = Image::Magick-&gt;new;<br> $x = $image-&gt;Read('girl.png', 'logo.png', 'rose.png');<br> warn "$x" if "$x";<br><br> $x = $image-&gt;Crop(geometry=&gt;'100x100"+100"+100');<br> warn "$x" if "$x";<br><br> $x = $image-&gt;Write('x.png');<br> warn "$x" if "$x";
432 </pre>
433 The script reads three images, crops them, and writes a single image as a GIF animation sequence. In many cases you may want to access individual images of a sequence. The next example illustrates how this is done:
434 <pre>
435- #!/usr/local/bin/perl<br> use Image::Magick;<br><br> my($image, $p, $q);<br><br> $image = new Image::Magick;<br> $image-&gt;Read('x1.png');<br> $image-&gt;Read('j*.jpg');<br> $image-&gt;Read('k.miff[1, 5, 3]');<br> $image-&gt;Contrast();<br> for ($x = 0; $image-&gt;[x]; $x++)<br> {<br> $image-&gt;[x]-&gt;Frame('100x200') if $image-&gt;[x]-&gt;Get('magick') eq 'GIF';<br> undef $image-&gt;[x] if $image-&gt;[x]-&gt;Get('columns') &lt; 100;<br> }<br> $p = $image-&gt;[1];<br> $p-&gt;Draw(stroke=&gt;'red', primitive=&gt;'rectangle', points=&gt;20,20 100,100');<br> $q = $p-&gt;Montage();<br> undef $image;<br> $q-&gt;Write('x.miff');
436+ #!/usr/bin/perl<br> use Image::Magick;<br><br> my($image, $p, $q);<br><br> $image = new Image::Magick;<br> $image-&gt;Read('x1.png');<br> $image-&gt;Read('j*.jpg');<br> $image-&gt;Read('k.miff[1, 5, 3]');<br> $image-&gt;Contrast();<br> for ($x = 0; $image-&gt;[x]; $x++)<br> {<br> $image-&gt;[x]-&gt;Frame('100x200') if $image-&gt;[x]-&gt;Get('magick') eq 'GIF';<br> undef $image-&gt;[x] if $image-&gt;[x]-&gt;Get('columns') &lt; 100;<br> }<br> $p = $image-&gt;[1];<br> $p-&gt;Draw(stroke=&gt;'red', primitive=&gt;'rectangle', points=&gt;20,20 100,100');<br> $q = $p-&gt;Montage();<br> undef $image;<br> $q-&gt;Write('x.miff');
437 </pre>
438 Suppose you want to start out with a 100 by 100 pixel white canvas with a red pixel in the center. Try
439 <pre>
This page took 0.078971 seconds and 4 git commands to generate.