]> git.pld-linux.org Git - packages/perl-Tk.git/blame - perl-Tk-paths.patch
projects / packages / perl-Tk.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
- updated to 800.023.
[packages/perl-Tk.git] / perl-Tk-paths.patch
CommitLineData
8586ce88 1diff -Nru Tk800.023/Contrib/TickerTape Tk800.023.new/Contrib/TickerTape
2--- Tk800.023/Contrib/TickerTape Sat Dec 30 17:12:37 2000
3+++ Tk800.023.new/Contrib/TickerTape Sat Sep 1 07:05:34 2001
4@@ -1,4 +1,4 @@
5-#!/usr/local/bin/perl
6+#!/usr/bin/perl
7
8 =head1 NAME
9
10diff -Nru Tk800.023/Contrib/book-examples/f-15.5.pl Tk800.023.new/Contrib/book-examples/f-15.5.pl
11--- Tk800.023/Contrib/book-examples/f-15.5.pl Sat Dec 30 17:12:37 2000
12+++ Tk800.023.new/Contrib/book-examples/f-15.5.pl Sat Sep 1 07:05:34 2001
e98aaa03 13@@ -1,4 +1,4 @@
14-#!/usr/local/bin/perl -w
15+#!/usr/bin/perl -w
16
17 #
18 # Figure 15.5, p153
8586ce88 19diff -Nru Tk800.023/Contrib/book-examples/f-16.1.pl Tk800.023.new/Contrib/book-examples/f-16.1.pl
20--- Tk800.023/Contrib/book-examples/f-16.1.pl Sat Dec 30 17:12:37 2000
21+++ Tk800.023.new/Contrib/book-examples/f-16.1.pl Sat Sep 1 07:05:34 2001
e98aaa03 22@@ -1,4 +1,4 @@
23-#!/usr/local/bin/perl -w
24+#!/usr/bin/perl -w
25
26 #
27 # Figure 16.1, p159
8586ce88 28diff -Nru Tk800.023/Contrib/book-examples/f-16.10.pl Tk800.023.new/Contrib/book-examples/f-16.10.pl
29--- Tk800.023/Contrib/book-examples/f-16.10.pl Sat Dec 30 17:12:37 2000
30+++ Tk800.023.new/Contrib/book-examples/f-16.10.pl Sat Sep 1 07:05:34 2001
e98aaa03 31@@ -1,4 +1,4 @@
32-#!/usr/local/bin/perl -w
33+#!/usr/bin/perl -w
34
35 #
36 # Figure 16.8, p166
8586ce88 37diff -Nru Tk800.023/Contrib/book-examples/f-16.2.pl Tk800.023.new/Contrib/book-examples/f-16.2.pl
38--- Tk800.023/Contrib/book-examples/f-16.2.pl Sat Dec 30 17:12:37 2000
39+++ Tk800.023.new/Contrib/book-examples/f-16.2.pl Sat Sep 1 07:05:34 2001
e98aaa03 40@@ -1,4 +1,4 @@
41-#!/usr/local/bin/perl -w
42+#!/usr/bin/perl -w
43
44 #
45 # Figure 16.2, p161
8586ce88 46diff -Nru Tk800.023/Contrib/book-examples/f-16.3.pl Tk800.023.new/Contrib/book-examples/f-16.3.pl
47--- Tk800.023/Contrib/book-examples/f-16.3.pl Sat Dec 30 17:12:37 2000
48+++ Tk800.023.new/Contrib/book-examples/f-16.3.pl Sat Sep 1 07:05:34 2001
e98aaa03 49@@ -1,4 +1,4 @@
50-#!/usr/local/bin/perl -w
51+#!/usr/bin/perl -w
52
53 #
54 # Figure 16.3, p162
8586ce88 55diff -Nru Tk800.023/Contrib/book-examples/f-16.6.pl Tk800.023.new/Contrib/book-examples/f-16.6.pl
56--- Tk800.023/Contrib/book-examples/f-16.6.pl Sat Dec 30 17:12:37 2000
57+++ Tk800.023.new/Contrib/book-examples/f-16.6.pl Sat Sep 1 07:05:34 2001
e98aaa03 58@@ -1,4 +1,4 @@
59-#!/usr/local/bin/perl -w
60+#!/usr/bin/perl -w
61
62 #
63 # Figure 16.6, p165
8586ce88 64diff -Nru Tk800.023/Contrib/book-examples/f-16.7.pl Tk800.023.new/Contrib/book-examples/f-16.7.pl
65--- Tk800.023/Contrib/book-examples/f-16.7.pl Sat Dec 30 17:12:37 2000
66+++ Tk800.023.new/Contrib/book-examples/f-16.7.pl Sat Sep 1 07:05:34 2001
e98aaa03 67@@ -1,4 +1,4 @@
68-#!/usr/local/bin/perl -w
69+#!/usr/bin/perl -w
70
71 #
72 # Figure 16.7, p166
8586ce88 73diff -Nru Tk800.023/Contrib/book-examples/f-16.8.pl Tk800.023.new/Contrib/book-examples/f-16.8.pl
74--- Tk800.023/Contrib/book-examples/f-16.8.pl Sat Dec 30 17:12:37 2000
75+++ Tk800.023.new/Contrib/book-examples/f-16.8.pl Sat Sep 1 07:05:34 2001
e98aaa03 76@@ -1,4 +1,4 @@
77-#!/usr/local/bin/perl -w
78+#!/usr/bin/perl -w
79
80 #
81 # Figure 16.8, p166
8586ce88 82diff -Nru Tk800.023/Contrib/book-examples/f-16.9.pl Tk800.023.new/Contrib/book-examples/f-16.9.pl
83--- Tk800.023/Contrib/book-examples/f-16.9.pl Sat Dec 30 17:12:37 2000
84+++ Tk800.023.new/Contrib/book-examples/f-16.9.pl Sat Sep 1 07:05:34 2001
e98aaa03 85@@ -1,4 +1,4 @@
86-#!/usr/local/bin/perl -w
87+#!/usr/bin/perl -w
88
89 #
90 # Figure 16.8, p166
8586ce88 91diff -Nru Tk800.023/Contrib/fd_demo Tk800.023.new/Contrib/fd_demo
92--- Tk800.023/Contrib/fd_demo Sat Dec 30 17:12:37 2000
93+++ Tk800.023.new/Contrib/fd_demo Sat Sep 1 07:05:34 2001
e98aaa03 94@@ -1,4 +1,4 @@
95-#!/usr/local/bin/perl -w
96+#!/usr/bin/perl -w
97
98 use Tk;
99 require Tk::FileDialog;
8586ce88 100diff -Nru Tk800.023/Contrib/testlistbox Tk800.023.new/Contrib/testlistbox
101--- Tk800.023/Contrib/testlistbox Sat Dec 30 17:12:37 2000
102+++ Tk800.023.new/Contrib/testlistbox Sat Sep 1 07:05:34 2001
e98aaa03 103@@ -1,4 +1,4 @@
104-#!/usr/local/bin/perl
105+#!/usr/bin/perl
106 use Tk;
107 use Tk::TiedListbox;
108
8586ce88 109diff -Nru Tk800.023/DragDrop/drag_test Tk800.023.new/DragDrop/drag_test
110--- Tk800.023/DragDrop/drag_test Sat Dec 30 17:12:37 2000
111+++ Tk800.023.new/DragDrop/drag_test Sat Sep 1 07:05:34 2001
e98aaa03 112@@ -1,4 +1,4 @@
113-#!/usr/local/bin/perl -w
114+#!/usr/bin/perl -w
115 use Tk;
116 use strict;
117 use Tk::DragDrop qw(Sun);
8586ce88 118diff -Nru Tk800.023/DragDrop/has_sun Tk800.023.new/DragDrop/has_sun
119--- Tk800.023/DragDrop/has_sun Sat Dec 30 17:12:37 2000
120+++ Tk800.023.new/DragDrop/has_sun Sat Sep 1 07:05:34 2001
e98aaa03 121@@ -1,4 +1,4 @@
122-#!/usr/local/bin/perl -w
123+#!/usr/bin/perl -w
124 use Tk;
125
126 my $mw = MainWindow->new;
8586ce88 127diff -Nru Tk800.023/DragDrop/local_test Tk800.023.new/DragDrop/local_test
128--- Tk800.023/DragDrop/local_test Sat Dec 30 17:12:37 2000
129+++ Tk800.023.new/DragDrop/local_test Sat Sep 1 07:05:34 2001
e98aaa03 130@@ -1,4 +1,4 @@
131-#!/usr/local/bin/perl -w
132+#!/usr/bin/perl -w
133 use Tk;
134 use strict;
135 use Tk::DragDrop;
8586ce88 136diff -Nru Tk800.023/DragDrop/motion_test Tk800.023.new/DragDrop/motion_test
137--- Tk800.023/DragDrop/motion_test Sat Dec 30 17:12:37 2000
138+++ Tk800.023.new/DragDrop/motion_test Sat Sep 1 07:05:34 2001
e98aaa03 139@@ -1,4 +1,4 @@
140-#!/usr/local/bin/perl -w
141+#!/usr/bin/perl -w
142 use Tk;
143 use strict;
144 use Tk::DragDrop;
8586ce88 145diff -Nru Tk800.023/DragDrop/selection Tk800.023.new/DragDrop/selection
146--- Tk800.023/DragDrop/selection Sat Dec 30 17:12:37 2000
147+++ Tk800.023.new/DragDrop/selection Sat Sep 1 07:05:34 2001
e98aaa03 148@@ -1,4 +1,4 @@
149-#!/usr/local/bin/perl -w
150+#!/usr/bin/perl -w
151 use Tk;
152 use strict;
153
8586ce88 154diff -Nru Tk800.023/DragDrop/site_test Tk800.023.new/DragDrop/site_test
155--- Tk800.023/DragDrop/site_test Sat Dec 30 17:12:37 2000
156+++ Tk800.023.new/DragDrop/site_test Sat Sep 1 07:05:34 2001
e98aaa03 157@@ -1,4 +1,4 @@
158-#!/usr/local/bin/perl -w
159+#!/usr/bin/perl -w
160 use Tk;
161 use strict;
162 use Tk::DropSite;
8586ce88 163diff -Nru Tk800.023/Extensions/ImageBack/background Tk800.023.new/Extensions/ImageBack/background
164--- Tk800.023/Extensions/ImageBack/background Sat Dec 30 17:12:37 2000
165+++ Tk800.023.new/Extensions/ImageBack/background Sat Sep 1 07:05:34 2001
e98aaa03 166@@ -1,4 +1,4 @@
167-#!/usr/local/bin/perl -w
168+#!/usr/bin/perl -w
169 use Tk;
170 use Tk::ImageBack;
171 use Tk::Photo;
8586ce88 172diff -Nru Tk800.023/HList/Tix2perl Tk800.023.new/HList/Tix2perl
173--- Tk800.023/HList/Tix2perl Sat Dec 30 17:12:37 2000
174+++ Tk800.023.new/HList/Tix2perl Sat Sep 1 07:05:34 2001
e98aaa03 175@@ -1,4 +1,4 @@
176-#!/usr/local/bin/perl -w
177+#!/usr/bin/perl -w
178
179 use Tk::Pretty;
180
8586ce88 181diff -Nru Tk800.023/TixGrid/tgdemo_config Tk800.023.new/TixGrid/tgdemo_config
182--- Tk800.023/TixGrid/tgdemo_config Sat Dec 30 17:12:37 2000
183+++ Tk800.023.new/TixGrid/tgdemo_config Sat Sep 1 07:05:34 2001
e98aaa03 184@@ -1,4 +1,4 @@
185-#!/usr/local/bin/perl -w
186+#!/usr/bin/perl -w
187 # tixgrid demo
188 # standalone or sourceable in ptksh
189
8586ce88 190diff -Nru Tk800.023/WinPhoto/try Tk800.023.new/WinPhoto/try
191--- Tk800.023/WinPhoto/try Sat Dec 30 17:12:37 2000
192+++ Tk800.023.new/WinPhoto/try Sat Sep 1 07:05:34 2001
e98aaa03 193@@ -1,4 +1,4 @@
194-#!/usr/local/bin/perl -w
195+#!/usr/bin/perl -w
196 use Tk;
197 use Tk::WinPhoto;
198 use Cwd;
8586ce88 199diff -Nru Tk800.023/Xlib/drops Tk800.023.new/Xlib/drops
200--- Tk800.023/Xlib/drops Sat Dec 30 17:12:37 2000
201+++ Tk800.023.new/Xlib/drops Sat Sep 1 07:05:34 2001
e98aaa03 202@@ -1,4 +1,4 @@
203-#!/usr/local/bin/perl
204+#!/usr/bin/perl
205
206
207 use Tk;
8586ce88 208diff -Nru Tk800.023/Xlib/load Tk800.023.new/Xlib/load
209--- Tk800.023/Xlib/load Sat Dec 30 17:12:37 2000
210+++ Tk800.023.new/Xlib/load Sat Sep 1 07:05:34 2001
e98aaa03 211@@ -1,4 +1,4 @@
212-#!/usr/local/bin/perl -w
213+#!/usr/bin/perl -w
214 use strict;
215 use Tk;
216 use Tk::Xlib;
8586ce88 217diff -Nru Tk800.023/Xlib/motif_site Tk800.023.new/Xlib/motif_site
218--- Tk800.023/Xlib/motif_site Sat Dec 30 17:12:37 2000
219+++ Tk800.023.new/Xlib/motif_site Sat Sep 1 07:05:34 2001
e98aaa03 220@@ -1,4 +1,4 @@
221-#!/usr/local/bin/perl -w
222+#!/usr/bin/perl -w
223 use Tk;
224 use Tk::Xlib;
225 use Data::Dumper;
8586ce88 226diff -Nru Tk800.023/Xlib/tree_demo Tk800.023.new/Xlib/tree_demo
227--- Tk800.023/Xlib/tree_demo Sat Dec 30 17:12:37 2000
228+++ Tk800.023.new/Xlib/tree_demo Sat Sep 1 07:05:34 2001
e98aaa03 229@@ -1,4 +1,4 @@
230-#!/usr/local/bin/perl -w
231+#!/usr/bin/perl -w
232 use Tk;
233 use Tk::Xlib;
234 use Tk::HList;
8586ce88 235diff -Nru Tk800.023/add_version Tk800.023.new/add_version
236--- Tk800.023/add_version Sat Dec 30 17:12:37 2000
237+++ Tk800.023.new/add_version Sat Sep 1 07:16:21 2001
8cfb8b61 238@@ -1,4 +1,4 @@
8586ce88 239-#!/tools/local/perl -w
e98aaa03 240+#!/usr/bin/perl -w
241 use strict;
242 use File::Find;
8586ce88 243 use Getopt::Std;
244diff -Nru Tk800.023/adj_demo Tk800.023.new/adj_demo
245--- Tk800.023/adj_demo Sat Dec 30 17:12:37 2000
246+++ Tk800.023.new/adj_demo Sat Sep 1 07:05:34 2001
e98aaa03 247@@ -1,4 +1,4 @@
8586ce88 248-#!/usr/local/bin/perl -w
249+#!/usr/bin/perl -w
250 use Tk;
251 require Tk::TextUndo;
e98aaa03 252
8586ce88 253diff -Nru Tk800.023/after_demo Tk800.023.new/after_demo
254--- Tk800.023/after_demo Sat Dec 30 17:12:37 2000
255+++ Tk800.023.new/after_demo Sat Sep 1 07:05:34 2001
8cfb8b61
AF		 256@@ -1,4 +1,4 @@
257-#!/usr/local/bin/perl -w
258+#!/usr/bin/perl -w
e98aaa03 259
8586ce88 260 use Tk;
261 use strict;
262diff -Nru Tk800.023/after_leak Tk800.023.new/after_leak
263--- Tk800.023/after_leak Sat Dec 30 17:12:37 2000
264+++ Tk800.023.new/after_leak Sat Sep 1 07:05:34 2001
8cfb8b61
AF		 265@@ -1,4 +1,4 @@
266-#!/usr/local/bin/perl -w
267+#!/usr/bin/perl -w
e98aaa03 268
8586ce88 269 use Tk;
270 use Devel::Leak;
271diff -Nru Tk800.023/al_bug Tk800.023.new/al_bug
272--- Tk800.023/al_bug Sat Dec 30 17:12:37 2000
273+++ Tk800.023.new/al_bug Sat Sep 1 07:16:29 2001
8cfb8b61 274@@ -1,4 +1,4 @@
8586ce88 275-#!/usr/local/bin/nperl -w
8cfb8b61 276+#!/usr/bin/perl -w
e98aaa03 277
8586ce88 278 use Tk;
279 use Tk::Table;
280diff -Nru Tk800.023/animate Tk800.023.new/animate
281--- Tk800.023/animate Sat Dec 30 17:12:37 2000
282+++ Tk800.023.new/animate Sat Sep 1 07:05:34 2001
e98aaa03 283@@ -1,4 +1,4 @@
284-#!/usr/local/bin/perl -w
285+#!/usr/bin/perl -w
8586ce88 286 use Tk;
8cfb8b61 287
8586ce88 288 my $mw = MainWindow->new;
289diff -Nru Tk800.023/autoraise Tk800.023.new/autoraise
290--- Tk800.023/autoraise Sat Dec 30 17:12:37 2000
291+++ Tk800.023.new/autoraise Sat Sep 1 07:05:34 2001
e98aaa03 292@@ -1,4 +1,4 @@
293-#!/usr/local/bin/perl -w
294+#!/usr/bin/perl -w
295
8586ce88 296 use Tk;
8cfb8b61 297
8586ce88 298diff -Nru Tk800.023/basic_demo Tk800.023.new/basic_demo
299--- Tk800.023/basic_demo Sat Dec 30 17:12:37 2000
300+++ Tk800.023.new/basic_demo Sat Sep 1 07:05:34 2001
8cfb8b61 301@@ -1,4 +1,4 @@
8586ce88 302-#!/usr/local/bin/perl
303+#!/usr/bin/perl
e98aaa03 304
8586ce88 305 # use Memory (2440);
e98aaa03 306
8586ce88 307diff -Nru Tk800.023/bin/defs Tk800.023.new/bin/defs
308--- Tk800.023/bin/defs Sat Dec 30 17:12:37 2000
309+++ Tk800.023.new/bin/defs Sat Sep 1 07:05:34 2001
e98aaa03 310@@ -1,4 +1,4 @@
8586ce88 311-#!/usr/local/bin/perl
312+#!/usr/bin/perl
e98aaa03 313
8586ce88 314 %def = ();
315 %need = ();
316diff -Nru Tk800.023/bin/defunc Tk800.023.new/bin/defunc
317--- Tk800.023/bin/defunc Sat Dec 30 17:12:37 2000
318+++ Tk800.023.new/bin/defunc Sat Sep 1 07:05:34 2001
8cfb8b61
AF		 319@@ -1,4 +1,4 @@
320-#!/usr/local/bin/perl
321+#!/usr/bin/perl
322
8586ce88 323 while (<>)
324 {
325diff -Nru Tk800.023/bin/newstyle Tk800.023.new/bin/newstyle
326--- Tk800.023/bin/newstyle Sat Dec 30 17:12:37 2000
327+++ Tk800.023.new/bin/newstyle Sat Sep 1 07:05:34 2001
e98aaa03 328@@ -1,4 +1,4 @@
8586ce88 329-#!/usr/local/bin/perl
330+#!/usr/bin/perl
8cfb8b61 331
8586ce88 332 @files = @ARGV;
8cfb8b61 333
8586ce88 334diff -Nru Tk800.023/bin/perms Tk800.023.new/bin/perms
335--- Tk800.023/bin/perms Sat Dec 30 17:12:37 2000
336+++ Tk800.023.new/bin/perms Sat Sep 1 07:05:34 2001
e98aaa03 337@@ -1,4 +1,4 @@
338-#!/usr/local/bin/perl -w
339+#!/usr/bin/perl -w
8586ce88 340 use strict;
341 use File::Find;
8cfb8b61 342
8586ce88 343diff -Nru Tk800.023/bin/unres Tk800.023.new/bin/unres
344--- Tk800.023/bin/unres Sat Dec 30 17:12:37 2000
345+++ Tk800.023.new/bin/unres Sat Sep 1 07:05:34 2001
e98aaa03 346@@ -1,4 +1,4 @@
347-#!/usr/local/bin/perl -w
348+#!/usr/bin/perl -w
349
8586ce88 350 %done = ();
351 %defs = ();
352diff -Nru Tk800.023/bin/uselib Tk800.023.new/bin/uselib
353--- Tk800.023/bin/uselib Sat Dec 30 17:12:37 2000
354+++ Tk800.023.new/bin/uselib Sat Sep 1 07:05:34 2001
e98aaa03 355@@ -1,4 +1,4 @@
8586ce88 356-#!/usr/local/bin/perl
357+#!/usr/bin/perl
e98aaa03 358
8cfb8b61 359 use File::Find;
e98aaa03 360
8586ce88 361diff -Nru Tk800.023/bindtest Tk800.023.new/bindtest
362--- Tk800.023/bindtest Sat Dec 30 17:12:37 2000
363+++ Tk800.023.new/bindtest Sat Sep 1 07:05:34 2001
e98aaa03 364@@ -1,4 +1,4 @@
365-#!/usr/local/bin/perl -w
366+#!/usr/bin/perl -w
8586ce88 367 use Tk;
368 use Tk::Menubar;
8cfb8b61 369
8586ce88 370diff -Nru Tk800.023/build Tk800.023.new/build
371--- Tk800.023/build Sat Dec 30 17:12:37 2000
372+++ Tk800.023.new/build Sat Sep 1 07:05:34 2001
e98aaa03 373@@ -1,4 +1,4 @@
374-#!/usr/local/bin/perl -w
375+#!/usr/bin/perl -w
8586ce88 376 use Config;
377 my $make = $Config{'make'};
378 my @para;
379diff -Nru Tk800.023/bulkedit Tk800.023.new/bulkedit
380--- Tk800.023/bulkedit Sat Dec 30 17:12:37 2000
381+++ Tk800.023.new/bulkedit Sat Sep 1 07:05:34 2001
e98aaa03 382@@ -1,4 +1,4 @@
383-#!/usr/local/bin/perl -w
384+#!/usr/bin/perl -w
385 use strict;
8586ce88 386 use Tk;
387 use Tk::LabEntry;
388diff -Nru Tk800.023/canvas_ps Tk800.023.new/canvas_ps
389--- Tk800.023/canvas_ps Sat Dec 30 17:12:37 2000
390+++ Tk800.023.new/canvas_ps Sat Sep 1 07:05:34 2001
e98aaa03 391@@ -1,4 +1,4 @@
392-#!/usr/local/bin/perl -w
393+#!/usr/bin/perl -w
e98aaa03 394
8586ce88 395 use Tk;
8cfb8b61 396
8586ce88 397diff -Nru Tk800.023/canvas_scroll Tk800.023.new/canvas_scroll
398--- Tk800.023/canvas_scroll Sat Dec 30 17:12:37 2000
399+++ Tk800.023.new/canvas_scroll Sat Sep 1 07:05:34 2001
e98aaa03 400@@ -1,4 +1,4 @@
401-#!/usr/local/bin/perl -w
402+#!/usr/bin/perl -w
8cfb8b61 403
8586ce88 404 use Tk;
8cfb8b61 405
8586ce88 406diff -Nru Tk800.023/cbtest Tk800.023.new/cbtest
407--- Tk800.023/cbtest Sat Dec 30 17:12:37 2000
408+++ Tk800.023.new/cbtest Sat Sep 1 07:05:34 2001
409@@ -1,4 +1,4 @@
410-#!/usr/local/bin/perl
411+#!/usr/bin/perl
8cfb8b61 412
8586ce88 413 use Tk;
414 use Tk::Pretty;
415diff -Nru Tk800.023/check_syms Tk800.023.new/check_syms
416--- Tk800.023/check_syms Sat Dec 30 17:12:37 2000
417+++ Tk800.023.new/check_syms Sat Sep 1 07:05:34 2001
e98aaa03 418@@ -1,4 +1,4 @@
419-#!/usr/local/bin/perl -w
420+#!/usr/bin/perl -w
8586ce88 421 use File::Find;
422 use Config;
423 my @libs;
424diff -Nru Tk800.023/checklen Tk800.023.new/checklen
425--- Tk800.023/checklen Sat Dec 30 17:12:37 2000
426+++ Tk800.023.new/checklen Sat Sep 1 07:05:34 2001
8cfb8b61
AF		 427@@ -1,4 +1,4 @@
428-#!/usr/local/bin/perl -w
429+#!/usr/bin/perl -w
8586ce88 430
431 use ExtUtils::Manifest "/mani/";
432
433diff -Nru Tk800.023/classtree Tk800.023.new/classtree
434--- Tk800.023/classtree Sat Dec 30 17:12:37 2000
435+++ Tk800.023.new/classtree Sat Sep 1 07:05:34 2001
8cfb8b61
AF		 436@@ -1,4 +1,4 @@
437-#!/usr/local/bin/perl -w
438+#!/usr/bin/perl -w
8cfb8b61 439 use strict;
8586ce88 440 use Tk;
441 use Tk::widgets qw(Tree Menubar);
442diff -Nru Tk800.023/cleanup Tk800.023.new/cleanup
443--- Tk800.023/cleanup Wed Feb 21 19:27:16 2001
444+++ Tk800.023.new/cleanup Sat Sep 1 07:05:34 2001
8cfb8b61
AF		 445@@ -1,4 +1,4 @@
446-#!/usr/local/bin/perl -w
447+#!/usr/bin/perl -w
8cfb8b61 448 use File::Find;
8586ce88 449 find(\&wanted,'.');
e98aaa03 450
8586ce88 451diff -Nru Tk800.023/clip_bug Tk800.023.new/clip_bug
452--- Tk800.023/clip_bug Sat Dec 30 17:12:37 2000
453+++ Tk800.023.new/clip_bug Sat Sep 1 07:05:34 2001
e98aaa03 454@@ -1,4 +1,4 @@
8cfb8b61
AF		 455-#!/usr/local/bin/perl -w
456+#!/usr/bin/perl -w
8586ce88 457 # Show a Tk canvas bug:
458 # when scrolling a canvas, clipping for embedded windows
459 # uses the embedded windows parent, not the canvas.
460diff -Nru Tk800.023/compile/findloader Tk800.023.new/compile/findloader
461--- Tk800.023/compile/findloader Sat Dec 30 17:12:37 2000
462+++ Tk800.023.new/compile/findloader Sat Sep 1 07:05:34 2001
8cfb8b61
AF		 463@@ -1,4 +1,4 @@
464-#!/usr/local/bin/perl -w
465+#!/usr/bin/perl -w
8586ce88 466 use Config;
467 my $sfx = $Config{'lib_ext'};
468 foreach my $dir (@INC)
469diff -Nru Tk800.023/compile/splitfunc Tk800.023.new/compile/splitfunc
470--- Tk800.023/compile/splitfunc Sat Dec 30 17:12:37 2000
471+++ Tk800.023.new/compile/splitfunc Sat Sep 1 07:05:34 2001
e98aaa03 472@@ -1,4 +1,4 @@
473-#!/usr/local/bin/perl -w
474+#!/usr/bin/perl -w
8586ce88 475 use IO::File;
e98aaa03 476
8586ce88 477 while (<>)
478diff -Nru Tk800.023/copydate Tk800.023.new/copydate
479--- Tk800.023/copydate Sat Dec 30 17:12:37 2000
480+++ Tk800.023.new/copydate Sat Sep 1 07:05:34 2001
481@@ -1,4 +1,4 @@
482-#!/usr/local/bin/perl
483+#!/usr/bin/perl
484
485 use File::Find;
486 use Time::Local;
487diff -Nru Tk800.023/cursor_demo Tk800.023.new/cursor_demo
488--- Tk800.023/cursor_demo Sat Dec 30 17:12:37 2000
489+++ Tk800.023.new/cursor_demo Sat Sep 1 07:05:34 2001
e98aaa03 490@@ -1,4 +1,4 @@
491-#!/usr/local/bin/perl -w
492+#!/usr/bin/perl -w
8cfb8b61
AF		 493 use Tk;
494
8586ce88 495 my $mw = MainWindow->new;
496diff -Nru Tk800.023/demos/browse Tk800.023.new/demos/browse
497--- Tk800.023/demos/browse Sat Dec 30 17:12:37 2000
498+++ Tk800.023.new/demos/browse Sat Sep 1 07:05:34 2001
e98aaa03 499@@ -1,4 +1,4 @@
500-#!/usr/local/bin/perl -w
501+#!/usr/bin/perl -w
8586ce88 502 #
503 # This script generates a directory browser, which lists the working directory and allows you to open files or subdirectories
504 # by double-clicking.
505diff -Nru Tk800.023/demos/color_editor Tk800.023.new/demos/color_editor
506--- Tk800.023/demos/color_editor Sat Dec 30 17:12:37 2000
507+++ Tk800.023.new/demos/color_editor Sat Sep 1 07:05:34 2001
e98aaa03 508@@ -1,4 +1,4 @@
509-#!/usr/local/bin/perl -w
510+#!/usr/bin/perl -w
8586ce88 511 #
512 # ColorEditor demonstration.
513
514diff -Nru Tk800.023/demos/composite Tk800.023.new/demos/composite
515--- Tk800.023/demos/composite Sat Dec 30 17:12:37 2000
516+++ Tk800.023.new/demos/composite Sat Sep 1 07:05:34 2001
8cfb8b61
AF		 517@@ -1,4 +1,4 @@
518-#!/usr/local/bin/perl -w
519+#!/usr/bin/perl -w
8586ce88 520
521
522 use English;
523diff -Nru Tk800.023/demos/dialog Tk800.023.new/demos/dialog
524--- Tk800.023/demos/dialog Sat Dec 30 17:12:37 2000
525+++ Tk800.023.new/demos/dialog Sat Sep 1 07:05:34 2001
e98aaa03 526@@ -1,4 +1,4 @@
527-#!/usr/local/bin/perl -w
528+#!/usr/bin/perl -w
529
8586ce88 530 # Demonstrate how to use Dialog to create and manipulate dialog objects.
531 # lusol@Lehigh.EDU 95/06/14
532diff -Nru Tk800.023/demos/hello Tk800.023.new/demos/hello
533--- Tk800.023/demos/hello Sat Dec 30 17:12:37 2000
534+++ Tk800.023.new/demos/hello Sat Sep 1 07:05:34 2001
e98aaa03 535@@ -1,4 +1,4 @@
536-#!/usr/local/bin/perl -w
537+#!/usr/bin/perl -w
8586ce88 538 #
539 # Simple Tk script to create a button that prints "Hello, world". Click on
540 # the button to terminate the program.
541diff -Nru Tk800.023/demos/ixset Tk800.023.new/demos/ixset
542--- Tk800.023/demos/ixset Sat Dec 30 17:12:37 2000
543+++ Tk800.023.new/demos/ixset Sat Sep 1 07:05:34 2001
e98aaa03 544@@ -1,4 +1,4 @@
545-#!/usr/local/bin/perl
546+#!/usr/bin/perl
547
8586ce88 548 # A nice interface to "xset" to change X server settings
549 #
550diff -Nru Tk800.023/demos/rmt Tk800.023.new/demos/rmt
551--- Tk800.023/demos/rmt Sat Dec 30 17:12:37 2000
552+++ Tk800.023.new/demos/rmt Sat Sep 1 07:05:34 2001
e98aaa03 553@@ -1,4 +1,4 @@
8586ce88 554-#!/usr/local/bin/perl -wT
555+#!/usr/bin/perl -wT
556 #
557 # This script implements a simple remote-control mechanism for Tk
558 # applications. It allows you to select an application and then type
559diff -Nru Tk800.023/demos/rolodex Tk800.023.new/demos/rolodex
560--- Tk800.023/demos/rolodex Sat Dec 30 17:12:37 2000
561+++ Tk800.023.new/demos/rolodex Sat Sep 1 07:05:34 2001
e98aaa03 562@@ -1,4 +1,4 @@
563-#!/usr/local/bin/perl -w
564+#!/usr/bin/perl -w
8586ce88 565 #
566 # This script was written as an entry in Tom LaStrange's rolodex benchmark.
567 # It creates something that has some of the look and feel of a rolodex program,# although it's lifeless and doesn't actually do the rolodex application.
568diff -Nru Tk800.023/demos/timer Tk800.023.new/demos/timer
569--- Tk800.023/demos/timer Sat Dec 30 17:12:37 2000
570+++ Tk800.023.new/demos/timer Sat Sep 1 07:05:34 2001
e98aaa03 571@@ -1,4 +1,4 @@
572-#!/usr/local/bin/perl -w
573+#!/usr/bin/perl -w
8586ce88 574 #
575 # This script generates a counter with start and stop buttons. Exit with
576 # Ctrl/c or Ctrl/q.
577diff -Nru Tk800.023/demos/tom Tk800.023.new/demos/tom
578--- Tk800.023/demos/tom Sat Dec 30 17:12:37 2000
579+++ Tk800.023.new/demos/tom Sat Sep 1 07:05:34 2001
e98aaa03 580@@ -1,4 +1,4 @@
581-#!/usr/local/bin/perl -w
582+#!/usr/bin/perl -w
8586ce88 583 #
584 # Sample program to get Tom Christiansen going with Perl/Tk.
e98aaa03 585
8586ce88 586diff -Nru Tk800.023/demos/widget Tk800.023.new/demos/widget
587--- Tk800.023/demos/widget Sat Dec 30 17:12:37 2000
588+++ Tk800.023.new/demos/widget Sat Sep 1 07:05:34 2001
e98aaa03 589@@ -1,4 +1,4 @@
590-#!/usr/local/bin/perl -w
591+#!/usr/bin/perl -w
592
8586ce88 593 require 5.004;
594
595diff -Nru Tk800.023/demos/widget_old Tk800.023.new/demos/widget_old
596--- Tk800.023/demos/widget_old Sat Dec 30 17:12:37 2000
597+++ Tk800.023.new/demos/widget_old Sat Sep 1 07:05:34 2001
e98aaa03 598@@ -1,4 +1,4 @@
599-#!/usr/local/bin/perl -w
600+#!/usr/bin/perl -w
8586ce88 601 #
602 # This script demonstrates the various widgets provided by Tk, along with many of the features of the Tk toolkit. This file
603 # only contains code to generate the main window for the application, which invokes individual demonstrations. The code for
604diff -Nru Tk800.023/derived_test Tk800.023.new/derived_test
605--- Tk800.023/derived_test Sat Dec 30 17:12:37 2000
606+++ Tk800.023.new/derived_test Sat Sep 1 07:05:34 2001
e98aaa03 607@@ -1,4 +1,4 @@
608-#!/usr/local/bin/perl -w
609+#!/usr/bin/perl -w
610 use Tk;
611 require Tk::Text;
612
8586ce88 613diff -Nru Tk800.023/destroy_test Tk800.023.new/destroy_test
614--- Tk800.023/destroy_test Sat Dec 30 17:12:37 2000
615+++ Tk800.023.new/destroy_test Sat Sep 1 07:05:34 2001
e98aaa03 616@@ -1,4 +1,4 @@
617-#!/usr/local/bin/perl -w
618+#!/usr/bin/perl -w
619
620
621 use Tk;
8586ce88 622diff -Nru Tk800.023/dfpy Tk800.023.new/dfpy
623--- Tk800.023/dfpy Sat Dec 30 17:12:37 2000
624+++ Tk800.023.new/dfpy Sat Sep 1 07:05:34 2001
e98aaa03 625@@ -1,4 +1,4 @@
626-#!/usr/local/bin/perl
627+#!/usr/bin/perl
628
629 use ExtUtils::Manifest "/mani/";
630 use Cwd;
8586ce88 631diff -Nru Tk800.023/disbutton Tk800.023.new/disbutton
632--- Tk800.023/disbutton Sat Dec 30 17:12:37 2000
633+++ Tk800.023.new/disbutton Sat Sep 1 07:05:34 2001
e98aaa03 634@@ -1,4 +1,4 @@
635-#!/usr/local/bin/perl -w
636+#!/usr/bin/perl -w
637
638 package StickyButton;
639 require Tk::Widget;
8586ce88 640diff -Nru Tk800.023/dnd_demo Tk800.023.new/dnd_demo
641--- Tk800.023/dnd_demo Sat Dec 30 17:12:37 2000
642+++ Tk800.023.new/dnd_demo Sat Sep 1 07:05:34 2001
e98aaa03 643@@ -1,4 +1,4 @@
644-#!/usr/local/bin/perl -w
645+#!/usr/bin/perl -w
646 #
647 # Demo code to exhibit features of dynamic construction and destruction of
648 # local (within app.) Drag and Drop sources and sinks. Written for and tested
8586ce88 649diff -Nru Tk800.023/dump_test Tk800.023.new/dump_test
650--- Tk800.023/dump_test Sat Dec 30 17:12:37 2000
651+++ Tk800.023.new/dump_test Sat Sep 1 07:05:34 2001
e98aaa03 652@@ -1,4 +1,4 @@
653-#!/usr/local/bin/perl -w
654+#!/usr/bin/perl -w
655 use Tk;
656 my $top = MainWindow->new;
657 my $i = $top->Photo(-file => Tk->findINC('icon.gif'));
8586ce88 658diff -Nru Tk800.023/embed Tk800.023.new/embed
659--- Tk800.023/embed Sat Dec 30 17:12:37 2000
660+++ Tk800.023.new/embed Sat Sep 1 07:05:34 2001
e98aaa03 661@@ -1,4 +1,4 @@
662-#!/usr/local/bin/perl -w
663+#!/usr/bin/perl -w
664
665 use Tk;
666 use IO::File;
8586ce88 667diff -Nru Tk800.023/error_prop Tk800.023.new/error_prop
668--- Tk800.023/error_prop Sat Dec 30 17:12:37 2000
669+++ Tk800.023.new/error_prop Sat Sep 1 07:05:34 2001
e98aaa03 670@@ -1,4 +1,4 @@
671-#!/usr/local/bin/perl -w
672+#!/usr/bin/perl -w
673
674 use Tk;
675 use Tk::ErrorDialog;
8586ce88 676diff -Nru Tk800.023/ewidth_demo Tk800.023.new/ewidth_demo
677--- Tk800.023/ewidth_demo Sat Dec 30 17:12:37 2000
678+++ Tk800.023.new/ewidth_demo Sat Sep 1 07:05:34 2001
e98aaa03 679@@ -1,4 +1,4 @@
680-#!/usr/local/bin/perl -w
681+#!/usr/bin/perl -w
682 use Tk;
683 use strict;
684
8586ce88 685diff -Nru Tk800.023/exetype Tk800.023.new/exetype
686--- Tk800.023/exetype Sat Dec 30 17:12:37 2000
687+++ Tk800.023.new/exetype Sat Sep 1 07:16:19 2001
688@@ -1,4 +1,4 @@
689-#!perl -w
690+#!/usr/bin/perl -w
691 use strict;
692 unless (@ARGV == 2) {
693 print "Usage: $0 exefile [CONSOLE|WINDOWS]\n";
694diff -Nru Tk800.023/fedemo Tk800.023.new/fedemo
695--- Tk800.023/fedemo Sat Dec 30 17:12:37 2000
696+++ Tk800.023.new/fedemo Sat Sep 1 07:16:28 2001
697@@ -1,4 +1,4 @@
698-#!/usr/local/bin/new/perl -w
699+#!/usr/bin/perl -w
700 use strict;
701 my $FILE_LOG = (@ARGV) ? shift : 'README';
702
703diff -Nru Tk800.023/fetail Tk800.023.new/fetail
704--- Tk800.023/fetail Sat Dec 30 17:12:37 2000
705+++ Tk800.023.new/fetail Sat Sep 1 07:16:18 2001
706@@ -1,4 +1,4 @@
707-#!/usr/local/bin/perl -w
708+#!/usr/bin/perl -w
709 use strict;
710 my $file = (@ARGV) ? shift : 'README';
711
712diff -Nru Tk800.023/findbase Tk800.023.new/findbase
713--- Tk800.023/findbase Sat Dec 30 17:12:37 2000
714+++ Tk800.023.new/findbase Sat Sep 1 07:05:34 2001
e98aaa03 715@@ -1,4 +1,4 @@
716-#!/usr/local/bin/perl -w
717+#!/usr/bin/perl -w
718
719 use File::Find;
720
8586ce88 721diff -Nru Tk800.023/floppy Tk800.023.new/floppy
722--- Tk800.023/floppy Sat Dec 30 17:12:37 2000
723+++ Tk800.023.new/floppy Sat Sep 1 07:05:34 2001
e98aaa03 724@@ -1,4 +1,4 @@
725-#!/usr/local/bin/perl
726+#!/usr/bin/perl
727
728 use ExtUtils::Manifest "/mani/";
729 use Cwd;
8586ce88 730diff -Nru Tk800.023/font_demo Tk800.023.new/font_demo
731--- Tk800.023/font_demo Sat Dec 30 17:12:37 2000
732+++ Tk800.023.new/font_demo Sat Sep 1 07:05:34 2001
e98aaa03 733@@ -1,4 +1,4 @@
734-#!/usr/local/bin/perl -w
735+#!/usr/bin/perl -w
736 use Tk;
8cfb8b61 737 use Tk::X11Font;
e98aaa03 738 use Tk::ROText;
8586ce88 739diff -Nru Tk800.023/font_test Tk800.023.new/font_test
740--- Tk800.023/font_test Sat Dec 30 17:12:37 2000
741+++ Tk800.023.new/font_test Sat Sep 1 07:05:34 2001
e98aaa03 742@@ -1,4 +1,4 @@
743-#!/usr/local/bin/perl -w
744+#!/usr/bin/perl -w
745
746
747
8586ce88 748diff -Nru Tk800.023/fonts Tk800.023.new/fonts
749--- Tk800.023/fonts Sat Dec 30 17:12:37 2000
750+++ Tk800.023.new/fonts Sat Sep 1 07:05:34 2001
e98aaa03 751@@ -1,4 +1,4 @@
752-#!/usr/local/bin/perl -w
753+#!/usr/bin/perl -w
754 use strict;
755 use Tk;
756 use Data::Dumper;
8586ce88 757diff -Nru Tk800.023/forward_test Tk800.023.new/forward_test
758--- Tk800.023/forward_test Sat Dec 30 17:12:37 2000
759+++ Tk800.023.new/forward_test Sat Sep 1 07:16:27 2001
760@@ -1,4 +1,4 @@
761-#!/usr/local/bin/nperl -w
762+#!/usr/bin/perl -w
763 use strict;
764 use Tk;
765
766diff -Nru Tk800.023/gdb.plx Tk800.023.new/gdb.plx
767--- Tk800.023/gdb.plx Sat Dec 30 17:12:37 2000
768+++ Tk800.023.new/gdb.plx Sat Sep 1 07:05:34 2001
e98aaa03 769@@ -1,4 +1,4 @@
770-#!/usr/local/bin/perl -w
771+#!/usr/bin/perl -w
772 use Config;
773 open(INIT,">.gdbinit") || die;
774 my $perl = $^X;
8586ce88 775diff -Nru Tk800.023/gedi Tk800.023.new/gedi
776--- Tk800.023/gedi Sat Dec 30 17:12:37 2000
777+++ Tk800.023.new/gedi Sat Sep 1 07:16:16 2001
778@@ -1,4 +1,4 @@
779-#!/usr/local/bin/perl -w
780+#!/usr/bin/perl -w
781
782 ###############################################################################
783 # Copyright (c) 1999 Greg London
784diff -Nru Tk800.023/geo_mgr Tk800.023.new/geo_mgr
785--- Tk800.023/geo_mgr Sat Dec 30 17:12:37 2000
786+++ Tk800.023.new/geo_mgr Sat Sep 1 07:05:34 2001
e98aaa03 787@@ -1,4 +1,4 @@
788-#!/usr/local/bin/perl -w
789+#!/usr/bin/perl -w
790
791 use Tk;
792
8586ce88 793diff -Nru Tk800.023/geom Tk800.023.new/geom
794--- Tk800.023/geom Sat Dec 30 17:12:37 2000
795+++ Tk800.023.new/geom Sat Sep 1 07:05:34 2001
e98aaa03 796@@ -1,4 +1,4 @@
797-#!/usr/local/bin/perl -w
798+#!/usr/bin/perl -w
799
800 use Tk;
801
8586ce88 802diff -Nru Tk800.023/grepc Tk800.023.new/grepc
803--- Tk800.023/grepc Sat Dec 30 13:16:02 2000
804+++ Tk800.023.new/grepc Sat Sep 1 07:05:34 2001
e98aaa03 805@@ -1,4 +1,4 @@
8cfb8b61
AF		 806-#!/tools/local/perl -w
807+#!/usr/bin/perl -w
808 use strict;
809 use vars qw($file);
810 use Data::Dumper;
8586ce88 811diff -Nru Tk800.023/grepperl Tk800.023.new/grepperl
812--- Tk800.023/grepperl Thu Mar 29 10:42:59 2001
813+++ Tk800.023.new/grepperl Sat Sep 1 07:08:10 2001
e98aaa03 814@@ -1,4 +1,4 @@
8586ce88 815-#!/tools/local/perl -w
816+#!/usr/bin/perl -w
e98aaa03 817
818 use Getopt::Std;
819
8586ce88 820diff -Nru Tk800.023/grid_adj Tk800.023.new/grid_adj
821--- Tk800.023/grid_adj Sat Dec 30 17:12:37 2000
822+++ Tk800.023.new/grid_adj Sat Sep 1 07:05:34 2001
e98aaa03 823@@ -1,4 +1,4 @@
824-#!/usr/local/bin/perl -w
825+#!/usr/bin/perl -w
826 use Tk;
827 require Tk::TextUndo;
828 require Tk::Adjuster;
8586ce88 829diff -Nru Tk800.023/grid_test Tk800.023.new/grid_test
830--- Tk800.023/grid_test Sat Dec 30 17:12:37 2000
831+++ Tk800.023.new/grid_test Sat Sep 1 07:05:34 2001
e98aaa03 832@@ -1,4 +1,4 @@
833-#!/usr/local/bin/perl -w
834+#!/usr/bin/perl -w
835 use Tk;
836 my $mw = MainWindow->new;
837 open(FILE,__FILE__);
8586ce88 838diff -Nru Tk800.023/gridbug Tk800.023.new/gridbug
839--- Tk800.023/gridbug Sat Dec 30 17:12:37 2000
840+++ Tk800.023.new/gridbug Sat Sep 1 07:05:34 2001
e98aaa03 841@@ -1,4 +1,4 @@
842-#!/usr/local/bin/perl -w
843+#!/usr/bin/perl -w
844 use Tk;
845 use Carp;
846 $top = MainWindow->new();
8586ce88 847diff -Nru Tk800.023/hackMM Tk800.023.new/hackMM
848--- Tk800.023/hackMM Sat Dec 30 17:12:37 2000
849+++ Tk800.023.new/hackMM Sat Sep 1 07:05:34 2001
e98aaa03 850@@ -1,4 +1,4 @@
851-#!/usr/local/bin/perl -w
852+#!/usr/bin/perl -w
853
854 use File::Find;
855
8586ce88 856diff -Nru Tk800.023/hlfm Tk800.023.new/hlfm
857--- Tk800.023/hlfm Sat Dec 30 17:12:37 2000
858+++ Tk800.023.new/hlfm Sat Sep 1 07:05:34 2001
e98aaa03 859@@ -1,4 +1,4 @@
860-#!/usr/local/bin/perl -w
861+#!/usr/bin/perl -w
862 use strict;
863 use Tk;
864 require Tk::Dirlist;
8586ce88 865diff -Nru Tk800.023/hlist_bg Tk800.023.new/hlist_bg
866--- Tk800.023/hlist_bg Sat Dec 30 17:12:37 2000
867+++ Tk800.023.new/hlist_bg Sat Sep 1 07:05:34 2001
e98aaa03 868@@ -1,4 +1,4 @@
869-#!/usr/local/bin/perl -w
870+#!/usr/bin/perl -w
871 use Tk;
872 require Tk::HList;
873
8586ce88 874diff -Nru Tk800.023/hlist_demo Tk800.023.new/hlist_demo
875--- Tk800.023/hlist_demo Sat Dec 30 17:12:37 2000
876+++ Tk800.023.new/hlist_demo Sat Sep 1 07:16:26 2001
877@@ -1,4 +1,4 @@
878-#!/usr/local/bin/nperl -w
879+#!/usr/bin/perl -w
880
881 use lib qw(blib .);
882 use Tk;
883diff -Nru Tk800.023/icon Tk800.023.new/icon
884--- Tk800.023/icon Sat Dec 30 17:12:37 2000
885+++ Tk800.023.new/icon Sat Sep 1 07:16:13 2001
886@@ -1,4 +1,4 @@
887-#!/tools/local/perl -w
888+#!/usr/bin/perl -w
889 use Tk;
890 my $mw = MainWindow->new;
891 my $image = $mw->Photo('-file' => Tk->findINC("icon.gif"));
892diff -Nru Tk800.023/iconimg Tk800.023.new/iconimg
893--- Tk800.023/iconimg Sat Dec 30 17:12:37 2000
894+++ Tk800.023.new/iconimg Sat Sep 1 07:16:25 2001
895@@ -1,4 +1,4 @@
896-#!/usr/local/bin/perl -w
897+#!/usr/bin/perl -w
898
899 use Tk;
900
901diff -Nru Tk800.023/iconwin Tk800.023.new/iconwin
902--- Tk800.023/iconwin Sat Dec 30 17:12:37 2000
903+++ Tk800.023.new/iconwin Sat Sep 1 07:05:34 2001
e98aaa03 904@@ -1,4 +1,4 @@
905-#!/usr/local/bin/perl -w
906+#!/usr/bin/perl -w
907
908 use Tk;
909
8586ce88 910diff -Nru Tk800.023/image_test Tk800.023.new/image_test
911--- Tk800.023/image_test Sat Dec 30 17:12:37 2000
912+++ Tk800.023.new/image_test Sat Sep 1 07:05:34 2001
e98aaa03 913@@ -1,4 +1,4 @@
914-#!/usr/local/bin/perl -w
915+#!/usr/bin/perl -w
916
917 use Tk;
918
8586ce88 919diff -Nru Tk800.023/inline_bitmap Tk800.023.new/inline_bitmap
920--- Tk800.023/inline_bitmap Sat Dec 30 17:12:37 2000
921+++ Tk800.023.new/inline_bitmap Sat Sep 1 07:05:34 2001
e98aaa03 922@@ -1,4 +1,4 @@
923-#!/usr/local/bin/perl -w
924+#!/usr/bin/perl -w
925 use strict;
926 use Tk;
927
8586ce88 928diff -Nru Tk800.023/keyWords Tk800.023.new/keyWords
929--- Tk800.023/keyWords Sat Dec 30 17:12:37 2000
930+++ Tk800.023.new/keyWords Sat Sep 1 07:05:34 2001
e98aaa03 931@@ -1,4 +1,4 @@
932-#!/usr/local/bin/perl -w
933+#!/usr/bin/perl -w
934
935 use File::Find;
936
8586ce88 937diff -Nru Tk800.023/labelpack Tk800.023.new/labelpack
938--- Tk800.023/labelpack Sat Dec 30 17:12:37 2000
939+++ Tk800.023.new/labelpack Sat Sep 1 07:05:34 2001
e98aaa03 940@@ -1,4 +1,4 @@
941-#!/usr/local/bin/perl -w
942+#!/usr/bin/perl -w
943
944 use Tk;
945 require Tk::LabEntry;
8586ce88 946diff -Nru Tk800.023/lbformat_demo Tk800.023.new/lbformat_demo
947--- Tk800.023/lbformat_demo Sat Dec 30 17:12:37 2000
948+++ Tk800.023.new/lbformat_demo Sat Sep 1 07:05:34 2001
e98aaa03 949@@ -1,4 +1,4 @@
950-#!/usr/local/bin/perl -w
951+#!/usr/bin/perl -w
952 use strict;
953 use Tk;
954 use Tk::Font;
8586ce88 955diff -Nru Tk800.023/leak_test Tk800.023.new/leak_test
956--- Tk800.023/leak_test Sat Dec 30 17:12:37 2000
957+++ Tk800.023.new/leak_test Sat Sep 1 07:05:34 2001
e98aaa03 958@@ -1,4 +1,4 @@
959-#!/usr/local/bin/perl -w
960+#!/usr/bin/perl -w
961
962 use Tk;
8cfb8b61 963 use Devel::Leak;
8586ce88 964diff -Nru Tk800.023/lentry Tk800.023.new/lentry
965--- Tk800.023/lentry Sat Dec 30 17:12:37 2000
966+++ Tk800.023.new/lentry Sat Sep 1 07:05:34 2001
e98aaa03 967@@ -1,4 +1,4 @@
968-#!/usr/local/bin/perl -w
969+#!/usr/bin/perl -w
970
971 use Tk;
972
8586ce88 973diff -Nru Tk800.023/linux-progbar-toy Tk800.023.new/linux-progbar-toy
974--- Tk800.023/linux-progbar-toy Sat Dec 30 17:12:37 2000
975+++ Tk800.023.new/linux-progbar-toy Sat Sep 1 07:16:00 2001
976@@ -1,4 +1,4 @@
977-#!/usr/local/bin/perl -w
978+#!/usr/bin/perl -w
979 use Tk;
980 use Tk::widgets qw(ProgressBar);
981
982diff -Nru Tk800.023/local_demo Tk800.023.new/local_demo
983--- Tk800.023/local_demo Sat Dec 30 17:12:37 2000
984+++ Tk800.023.new/local_demo Sat Sep 1 07:05:34 2001
e98aaa03 985@@ -1,4 +1,4 @@
986-#!/usr/local/bin/perl -w
987+#!/usr/bin/perl -w
988 use strict;
989 use Tk qw(MainLoop *widget);
990 use Carp;
8586ce88 991diff -Nru Tk800.023/ls_table Tk800.023.new/ls_table
992--- Tk800.023/ls_table Sat Dec 30 17:12:37 2000
993+++ Tk800.023.new/ls_table Sat Sep 1 07:05:34 2001
e98aaa03 994@@ -1,4 +1,4 @@
995-#!/usr/local/bin/perl -w
996+#!/usr/bin/perl -w
997
998 use Tk;
999 use Tk::Table;
8586ce88 1000diff -Nru Tk800.023/lsfonts Tk800.023.new/lsfonts
1001--- Tk800.023/lsfonts Sat Dec 30 17:12:37 2000
1002+++ Tk800.023.new/lsfonts Sat Sep 1 07:05:34 2001
e98aaa03 1003@@ -1,4 +1,4 @@
1004-#!/usr/local/bin/perl -w
1005+#!/usr/bin/perl -w
1006
1007 use Tk;
1008 use Tk::Xlib;
8586ce88 1009diff -Nru Tk800.023/menubar Tk800.023.new/menubar
1010--- Tk800.023/menubar Sat Dec 30 17:12:37 2000
1011+++ Tk800.023.new/menubar Sat Sep 1 07:05:34 2001
e98aaa03 1012@@ -1,4 +1,4 @@
1013-#!/usr/local/bin/perl -w
1014+#!/usr/bin/perl -w
1015
1016 use Tk;
1017
8586ce88 1018diff -Nru Tk800.023/menubug Tk800.023.new/menubug
1019--- Tk800.023/menubug Sat Dec 30 17:12:37 2000
1020+++ Tk800.023.new/menubug Sat Sep 1 07:05:34 2001
e98aaa03 1021@@ -1,4 +1,4 @@
1022-#!/usr/local/bin/perl -w
1023+#!/usr/bin/perl -w
1024 use Tk;
1025 use strict;
1026
8586ce88 1027diff -Nru Tk800.023/mitem_test Tk800.023.new/mitem_test
1028--- Tk800.023/mitem_test Sat Dec 30 17:12:37 2000
1029+++ Tk800.023.new/mitem_test Sat Sep 1 07:05:34 2001
e98aaa03 1030@@ -1,4 +1,4 @@
1031-#!/usr/local/bin/perl -w
1032+#!/usr/bin/perl -w
1033
1034 require 5.003;
1035 use English;
8586ce88 1036diff -Nru Tk800.023/mkExt Tk800.023.new/mkExt
1037--- Tk800.023/mkExt Sat Dec 30 17:12:37 2000
1038+++ Tk800.023.new/mkExt Sat Sep 1 07:05:34 2001
e98aaa03 1039@@ -1,4 +1,4 @@
1040-#!/usr/local/bin/perl -w
1041+#!/usr/bin/perl -w
1042
1043 sub translate
1044 {
8586ce88 1045diff -Nru Tk800.023/mkdist Tk800.023.new/mkdist
1046--- Tk800.023/mkdist Sat Dec 30 17:12:37 2000
1047+++ Tk800.023.new/mkdist Sat Sep 1 07:05:34 2001
e98aaa03 1048@@ -1,4 +1,4 @@
1049-#!/usr/local/bin/perl -w
1050+#!/usr/bin/perl -w
1051 use strict;
1052
1053 use ExtUtils::Manifest "/mani/";
8586ce88 1054diff -Nru Tk800.023/motif_hack Tk800.023.new/motif_hack
1055--- Tk800.023/motif_hack Sat Dec 30 17:12:37 2000
1056+++ Tk800.023.new/motif_hack Sat Sep 1 07:05:34 2001
e98aaa03 1057@@ -1,4 +1,4 @@
1058-#!/usr/local/bin/perl -w
1059+#!/usr/bin/perl -w
1060 use Data::Dumper;
1061 use strict;
1062 use Tk;
8586ce88 1063diff -Nru Tk800.023/nested_dialog Tk800.023.new/nested_dialog
1064--- Tk800.023/nested_dialog Sat Dec 30 17:12:37 2000
1065+++ Tk800.023.new/nested_dialog Sat Sep 1 07:05:34 2001
e98aaa03 1066@@ -1,4 +1,4 @@
1067-#!/usr/local/bin/perl -w
1068+#!/usr/bin/perl -w
1069
1070 use Tk;
1071 use Tk::Dialog;
8586ce88 1072diff -Nru Tk800.023/oddmenu_demo Tk800.023.new/oddmenu_demo
1073--- Tk800.023/oddmenu_demo Sat Dec 30 17:12:37 2000
1074+++ Tk800.023.new/oddmenu_demo Sat Sep 1 07:05:34 2001
e98aaa03 1075@@ -1,4 +1,4 @@
1076-#!/usr/local/bin/perl -w
1077+#!/usr/bin/perl -w
1078 use strict;
1079 use Tk;
1080
8586ce88 1081diff -Nru Tk800.023/pTk/LangIO.h.PL Tk800.023.new/pTk/LangIO.h.PL
1082--- Tk800.023/pTk/LangIO.h.PL Sun Feb 4 20:16:51 2001
1083+++ Tk800.023.new/pTk/LangIO.h.PL Sat Sep 1 07:05:34 2001
1084@@ -1,4 +1,4 @@
1085-#!/usr/local/bin/perl -w
1086+#!/usr/bin/perl -w
1087 use Config;
1088 my @gard = qw(
1089 STDIO_H
1090diff -Nru Tk800.023/pTk/Tcl-pTk Tk800.023.new/pTk/Tcl-pTk
1091--- Tk800.023/pTk/Tcl-pTk Sat Dec 30 17:12:37 2000
1092+++ Tk800.023.new/pTk/Tcl-pTk Sat Sep 1 07:05:34 2001
1093@@ -1,4 +1,4 @@
1094-#!/usr/local/bin/perl -w
1095+#!/usr/bin/perl -w
1096
1097 use Carp;
1098
1099diff -Nru Tk800.023/pTk/chext Tk800.023.new/pTk/chext
1100--- Tk800.023/pTk/chext Sat Dec 30 17:12:37 2000
1101+++ Tk800.023.new/pTk/chext Sat Sep 1 07:05:34 2001
1102@@ -1,4 +1,4 @@
1103-#!/usr/local/bin/perl -w
1104+#!/usr/bin/perl -w
1105
1106 open(NEED,"<need") || die;
1107 while (<NEED>)
1108diff -Nru Tk800.023/pTk/counts Tk800.023.new/pTk/counts
1109--- Tk800.023/pTk/counts Sat Dec 30 17:12:37 2000
1110+++ Tk800.023.new/pTk/counts Sat Sep 1 07:05:34 2001
1111@@ -1,4 +1,4 @@
1112-#!/usr/local/bin/perl
1113+#!/usr/bin/perl
1114
1115 sub count
1116 {
1117diff -Nru Tk800.023/pTk/findX Tk800.023.new/pTk/findX
1118--- Tk800.023/pTk/findX Sat Dec 30 17:12:37 2000
1119+++ Tk800.023.new/pTk/findX Sat Sep 1 07:05:34 2001
1120@@ -1,4 +1,4 @@
1121-#!/usr/local/bin/perl -w
1122+#!/usr/bin/perl -w
1123
1124 BEGIN { require Exporter };
1125
1126diff -Nru Tk800.023/pTk/findcore Tk800.023.new/pTk/findcore
1127--- Tk800.023/pTk/findcore Sat Dec 30 17:12:37 2000
1128+++ Tk800.023.new/pTk/findcore Sat Sep 1 07:05:34 2001
1129@@ -1,4 +1,4 @@
1130-#!/usr/local/bin/perl -w
1131+#!/usr/bin/perl -w
1132
1133 BEGIN { require Exporter };
1134
1135diff -Nru Tk800.023/pTk/findstrings Tk800.023.new/pTk/findstrings
1136--- Tk800.023/pTk/findstrings Sat Dec 30 17:12:37 2000
1137+++ Tk800.023.new/pTk/findstrings Sat Sep 1 07:05:34 2001
1138@@ -1,4 +1,4 @@
1139-#!/usr/local/bin/perl -w
1140+#!/usr/bin/perl -w
1141
1142
1143 %table = ();
1144diff -Nru Tk800.023/pTk/from Tk800.023.new/pTk/from
1145--- Tk800.023/pTk/from Sat Dec 30 17:12:37 2000
1146+++ Tk800.023.new/pTk/from Sat Sep 1 07:05:34 2001
1147@@ -1,4 +1,4 @@
1148-#!/usr/local/bin/perl -w
1149+#!/usr/bin/perl -w
1150 use strict;
1151
1152 use File::Find;
1153diff -Nru Tk800.023/pTk/genexc Tk800.023.new/pTk/genexc
1154--- Tk800.023/pTk/genexc Sat Dec 30 17:12:37 2000
1155+++ Tk800.023.new/pTk/genexc Sat Sep 1 07:05:34 2001
1156@@ -1,4 +1,4 @@
1157-#!/usr/local/bin/perl -w
1158+#!/usr/bin/perl -w
1159
1160 my %mTk;
1161 my $dir;
1162diff -Nru Tk800.023/pTk/mTk/tclmerge Tk800.023.new/pTk/mTk/tclmerge
1163--- Tk800.023/pTk/mTk/tclmerge Sat Dec 30 17:12:37 2000
1164+++ Tk800.023.new/pTk/mTk/tclmerge Sat Sep 1 07:05:34 2001
1165@@ -1,4 +1,4 @@
1166-#!/usr/local/bin/perl -w
1167+#!/usr/bin/perl -w
1168
1169 use strict;
1170
1171diff -Nru Tk800.023/pTk/mTk/tixmerge Tk800.023.new/pTk/mTk/tixmerge
1172--- Tk800.023/pTk/mTk/tixmerge Sat Dec 30 17:12:37 2000
1173+++ Tk800.023.new/pTk/mTk/tixmerge Sat Sep 1 07:05:34 2001
1174@@ -1,4 +1,4 @@
1175-#!/usr/local/bin/perl -w
1176+#!/usr/bin/perl -w
1177
1178 use strict;
1179
1180diff -Nru Tk800.023/pTk/makeenglish Tk800.023.new/pTk/makeenglish
1181--- Tk800.023/pTk/makeenglish Sat Dec 30 17:12:37 2000
1182+++ Tk800.023.new/pTk/makeenglish Sat Sep 1 07:05:34 2001
1183@@ -1,4 +1,4 @@
1184-#!/usr/local/bin/perl -w
1185+#!/usr/bin/perl -w
1186 # BEGIN { push(@INC, qw(../../../lib ../../lib ../lib lib)) }
1187
1188 die "Must be executed from Tk/pTk distribution directory\n" unless -f "Lang.h";
1189diff -Nru Tk800.023/pTk/mkVFunc Tk800.023.new/pTk/mkVFunc
1190--- Tk800.023/pTk/mkVFunc Sat Dec 30 17:12:37 2000
1191+++ Tk800.023.new/pTk/mkVFunc Sat Sep 1 07:05:34 2001
1192@@ -1,4 +1,4 @@
1193-#!/usr/local/bin/perl -w
1194+#!/usr/bin/perl -w
1195 use strict;
1196
1197 my %Ignore;
1198diff -Nru Tk800.023/pTk/mkXinfo Tk800.023.new/pTk/mkXinfo
1199--- Tk800.023/pTk/mkXinfo Sat Dec 30 17:12:37 2000
1200+++ Tk800.023.new/pTk/mkXinfo Sat Sep 1 07:05:34 2001
1201@@ -1,4 +1,4 @@
1202-#!/usr/local/bin/perl -w
1203+#!/usr/bin/perl -w
1204
1205 $file = shift;
1206
1207diff -Nru Tk800.023/pTk/mkexc Tk800.023.new/pTk/mkexc
1208--- Tk800.023/pTk/mkexc Sat Dec 30 17:12:37 2000
1209+++ Tk800.023.new/pTk/mkexc Sat Sep 1 07:05:34 2001
1210@@ -1,4 +1,4 @@
1211-#!/usr/local/bin/perl -w
1212+#!/usr/bin/perl -w
1213 use strict;
1214 use vars qw(%ref %def);
1215 require "process_object";
1216diff -Nru Tk800.023/pTk/mkmethods Tk800.023.new/pTk/mkmethods
1217--- Tk800.023/pTk/mkmethods Sat Dec 30 17:12:37 2000
1218+++ Tk800.023.new/pTk/mkmethods Sat Sep 1 07:05:34 2001
1219@@ -1,4 +1,4 @@
1220-#!/usr/local/bin/perl -w
1221+#!/usr/bin/perl -w
1222
1223 $dst = shift;
1224
1225diff -Nru Tk800.023/pTk/tdiff Tk800.023.new/pTk/tdiff
1226--- Tk800.023/pTk/tdiff Sat Dec 30 17:12:37 2000
1227+++ Tk800.023.new/pTk/tdiff Sat Sep 1 07:05:34 2001
1228@@ -1,4 +1,4 @@
1229-#!/usr/local/bin/perl -w
1230+#!/usr/bin/perl -w
1231
1232 sub fail
1233 {
1234diff -Nru Tk800.023/pTk/why Tk800.023.new/pTk/why
1235--- Tk800.023/pTk/why Sat Dec 30 17:12:37 2000
1236+++ Tk800.023.new/pTk/why Sat Sep 1 07:05:34 2001
1237@@ -1,4 +1,4 @@
1238-#!/usr/local/bin/perl -w
1239+#!/usr/bin/perl -w
1240
1241 use strict;
1242
1243diff -Nru Tk800.023/pfm Tk800.023.new/pfm
1244--- Tk800.023/pfm Sat Dec 30 17:12:37 2000
1245+++ Tk800.023.new/pfm Sat Sep 1 07:05:34 2001
e98aaa03 1246@@ -1,4 +1,4 @@
1247-#!/usr/local/bin/perl -w
1248+#!/usr/bin/perl -w
1249 use POSIX qw(getcwd);
1250
1251 use Tk;
8586ce88 1252diff -Nru Tk800.023/pictgrid Tk800.023.new/pictgrid
1253--- Tk800.023/pictgrid Sat Dec 30 17:12:37 2000
1254+++ Tk800.023.new/pictgrid Sat Sep 1 07:05:34 2001
e98aaa03 1255@@ -1,4 +1,4 @@
1256-#!/usr/local/bin/perl -w
1257+#!/usr/bin/perl -w
1258 use strict;
1259 use Tk;
1260
8586ce88 1261diff -Nru Tk800.023/pipe_test Tk800.023.new/pipe_test
1262--- Tk800.023/pipe_test Sat Dec 30 17:12:37 2000
1263+++ Tk800.023.new/pipe_test Sat Sep 1 07:05:34 2001
e98aaa03 1264@@ -1,4 +1,4 @@
1265-#!/usr/local/bin/perl -w
1266+#!/usr/bin/perl -w
1267 use Tk;
1268
1269 require Tk::IO;
8586ce88 1270diff -Nru Tk800.023/pixels-points Tk800.023.new/pixels-points
1271--- Tk800.023/pixels-points Sat Dec 30 17:12:37 2000
1272+++ Tk800.023.new/pixels-points Sat Sep 1 07:16:24 2001
1273@@ -1,4 +1,4 @@
1274-#!/usr/local/bin/new/perl -w
1275+#!/usr/bin/perl -w
1276 use strict;
1277 use Tk;
1278 use Tk::Xlib;
1279diff -Nru Tk800.023/pixmap_test Tk800.023.new/pixmap_test
1280--- Tk800.023/pixmap_test Sat Dec 30 17:12:37 2000
1281+++ Tk800.023.new/pixmap_test Sat Sep 1 07:05:34 2001
e98aaa03 1282@@ -1,4 +1,4 @@
1283-#!/usr/local/bin/perl -w
1284+#!/usr/bin/perl -w
1285 use strict;
1286 use Tk;
1287 require Tk::Pixmap;
8586ce88 1288diff -Nru Tk800.023/pod/extract/extpod Tk800.023.new/pod/extract/extpod
1289--- Tk800.023/pod/extract/extpod Sat Dec 30 17:12:37 2000
1290+++ Tk800.023.new/pod/extract/extpod Sat Sep 1 07:05:34 2001
1291@@ -1,4 +1,4 @@
1292-#!/usr/local/bin/perl -w
1293+#!/usr/bin/perl -w
1294 use strict;
1295 use Getopt::Std;
1296 use ExtUtils::Manifest "/mani/";
1297diff -Nru Tk800.023/pod/recat Tk800.023.new/pod/recat
1298--- Tk800.023/pod/recat Sat Dec 30 17:12:37 2000
1299+++ Tk800.023.new/pod/recat Sat Sep 1 07:05:34 2001
1300@@ -1,4 +1,4 @@
1301-#!/usr/local/bin/perl -w
1302+#!/usr/bin/perl -w
1303 use strict;
1304 my $sec;
1305 my %cat;
1306diff -Nru Tk800.023/pod/subs Tk800.023.new/pod/subs
1307--- Tk800.023/pod/subs Sat Dec 30 17:12:37 2000
1308+++ Tk800.023.new/pod/subs Sat Sep 1 07:05:34 2001
1309@@ -1,4 +1,4 @@
1310-#!/usr/local/bin/perl -w
1311+#!/usr/bin/perl -w
1312 use blib;
1313 use Tk;
1314 use strict;
1315diff -Nru Tk800.023/point_test Tk800.023.new/point_test
1316--- Tk800.023/point_test Sat Dec 30 17:12:37 2000
1317+++ Tk800.023.new/point_test Sat Sep 1 07:15:55 2001
1318@@ -1,4 +1,4 @@
1319-#!/usr/local/bin/perl -w
1320+#!/usr/bin/perl -w
1321 use strict;
1322 use Tk;
1323
1324diff -Nru Tk800.023/popup Tk800.023.new/popup
1325--- Tk800.023/popup Sat Dec 30 17:12:37 2000
1326+++ Tk800.023.new/popup Sat Sep 1 07:05:34 2001
e98aaa03 1327@@ -1,4 +1,4 @@
1328-#!/usr/local/bin/perl -w
1329+#!/usr/bin/perl -w
1330
1331
1332 use Tk;
8586ce88 1333diff -Nru Tk800.023/popup_menu Tk800.023.new/popup_menu
1334--- Tk800.023/popup_menu Sat Dec 30 17:12:37 2000
1335+++ Tk800.023.new/popup_menu Sat Sep 1 07:05:34 2001
e98aaa03 1336@@ -1,4 +1,4 @@
1337-#!/usr/local/bin/perl -w
1338+#!/usr/bin/perl -w
1339 use strict;
1340
1341 use Tk;
8586ce88 1342diff -Nru Tk800.023/prop_demo Tk800.023.new/prop_demo
1343--- Tk800.023/prop_demo Sat Dec 30 17:12:37 2000
1344+++ Tk800.023.new/prop_demo Sat Sep 1 07:05:34 2001
e98aaa03 1345@@ -1,4 +1,4 @@
1346-#!/usr/local/bin/perl -w
1347+#!/usr/bin/perl -w
1348
1349 use Tk;
1350
8586ce88 1351diff -Nru Tk800.023/ptked Tk800.023.new/ptked
1352--- Tk800.023/ptked Sat Dec 30 17:12:37 2000
1353+++ Tk800.023.new/ptked Sat Sep 1 07:05:34 2001
e98aaa03 1354@@ -1,4 +1,4 @@
1355-#!/usr/local/bin/perl -w
1356+#!/usr/bin/perl -w
8cfb8b61
AF		 1357 use strict;
1358 use IO;
1359 use Socket;
8586ce88 1360diff -Nru Tk800.023/ptknews Tk800.023.new/ptknews
1361--- Tk800.023/ptknews Sat Dec 30 17:12:37 2000
1362+++ Tk800.023.new/ptknews Sat Sep 1 07:05:34 2001
e98aaa03 1363@@ -1,4 +1,4 @@
1364-#!/usr/local/bin/perl -w
1365+#!/usr/bin/perl -w
1366
1367 use strict;
1368 use Tk;
8586ce88 1369diff -Nru Tk800.023/ptksh Tk800.023.new/ptksh
1370--- Tk800.023/ptksh Sat Dec 30 17:12:37 2000
1371+++ Tk800.023.new/ptksh Sat Sep 1 07:16:23 2001
1372@@ -1,4 +1,4 @@
1373-#!perl -w
1374+#!/usr/bin/perl -w
1375 #
1376 # PTKSH 2.0
1377 #
1378diff -Nru Tk800.023/rebuild Tk800.023.new/rebuild
1379--- Tk800.023/rebuild Sat Dec 30 17:12:37 2000
1380+++ Tk800.023.new/rebuild Sat Sep 1 07:15:54 2001
1381@@ -1,4 +1,4 @@
1382-#!/usr/local/bin/new/perl -w
1383+#!/usr/bin/perl -w
1384 open(STDERR,">&STDOUT") || die "Cannot redirect STDERR";
1385 $| = 1;
1386 use Cwd;
1387diff -Nru Tk800.023/scale_test Tk800.023.new/scale_test
1388--- Tk800.023/scale_test Sat Dec 30 17:12:37 2000
1389+++ Tk800.023.new/scale_test Sat Sep 1 07:05:34 2001
e98aaa03 1390@@ -1,4 +1,4 @@
1391-#!/usr/local/bin/perl -w
1392+#!/usr/bin/perl -w
1393
1394 use Tk;
1395
8586ce88 1396diff -Nru Tk800.023/scrolled_demo Tk800.023.new/scrolled_demo
1397--- Tk800.023/scrolled_demo Sat Dec 30 17:12:37 2000
1398+++ Tk800.023.new/scrolled_demo Sat Sep 1 07:05:34 2001
e98aaa03 1399@@ -1,4 +1,4 @@
1400-#!/usr/local/bin/perl -w
1401+#!/usr/bin/perl -w
1402
1403 use Tk;
1404 use strict;
8586ce88 1405diff -Nru Tk800.023/sillymenu Tk800.023.new/sillymenu
1406--- Tk800.023/sillymenu Sat Dec 30 17:12:37 2000
1407+++ Tk800.023.new/sillymenu Sat Sep 1 07:05:34 2001
e98aaa03 1408@@ -1,4 +1,4 @@
1409-#!/usr/local/bin/perl -w
1410+#!/usr/bin/perl -w
1411 use strict;
1412 use Tk;
1413
8586ce88 1414diff -Nru Tk800.023/sockets Tk800.023.new/sockets
1415--- Tk800.023/sockets Sat Dec 30 17:12:37 2000
1416+++ Tk800.023.new/sockets Sat Sep 1 07:05:34 2001
e98aaa03 1417@@ -1,4 +1,4 @@
1418-#!/usr/local/bin/perl -w
1419+#!/usr/bin/perl -w
1420
1421 use IO::Socket;
1422 use Tk::IO;
8586ce88 1423diff -Nru Tk800.023/stripblib Tk800.023.new/stripblib
1424--- Tk800.023/stripblib Sat Dec 30 17:12:37 2000
1425+++ Tk800.023.new/stripblib Sat Sep 1 07:05:34 2001
e98aaa03 1426@@ -1,4 +1,4 @@
1427-#!/usr/local/bin/perl -w
1428+#!/usr/bin/perl -w
1429 use File::Find;
1430 find(\&strip,'blib/arch');
1431
8586ce88 1432diff -Nru Tk800.023/style_test Tk800.023.new/style_test
1433--- Tk800.023/style_test Sat Dec 30 17:12:37 2000
1434+++ Tk800.023.new/style_test Sat Sep 1 07:05:34 2001
e98aaa03 1435@@ -1,4 +1,4 @@
1436-#!/usr/local/bin/perl -w
1437+#!/usr/bin/perl -w
1438
1439 use Tk;
1440 use Tk::HList;
8586ce88 1441diff -Nru Tk800.023/submethods Tk800.023.new/submethods
1442--- Tk800.023/submethods Sat Dec 30 17:12:37 2000
1443+++ Tk800.023.new/submethods Sat Sep 1 07:05:34 2001
e98aaa03 1444@@ -1,4 +1,4 @@
1445-#!/usr/local/bin/perl -w
1446+#!/usr/bin/perl -w
1447 $meth = "pTk/Methods.def";
1448
1449 %sub = ();
8586ce88 1450diff -Nru Tk800.023/symbols Tk800.023.new/symbols
1451--- Tk800.023/symbols Sat Dec 30 17:12:37 2000
1452+++ Tk800.023.new/symbols Sat Sep 1 07:05:34 2001
e98aaa03 1453@@ -1,4 +1,4 @@
1454-#!/usr/local/bin/perl -w
1455+#!/usr/bin/perl -w
1456
1457 use Config;
1458
8586ce88 1459diff -Nru Tk800.023/table_demo Tk800.023.new/table_demo
1460--- Tk800.023/table_demo Sat Dec 30 17:12:37 2000
1461+++ Tk800.023.new/table_demo Sat Sep 1 07:05:34 2001
e98aaa03 1462@@ -1,4 +1,4 @@
1463-#!/usr/local/bin/perl -w
1464+#!/usr/bin/perl -w
1465
1466 use Tk;
1467 use Tk::Table;
8586ce88 1468diff -Nru Tk800.023/tainted Tk800.023.new/tainted
1469--- Tk800.023/tainted Sat Dec 30 17:12:37 2000
1470+++ Tk800.023.new/tainted Sat Sep 1 07:05:34 2001
e98aaa03 1471@@ -1,4 +1,4 @@
1472-#!/usr/local/bin/perl -T
1473+#!/usr/bin/perl -T
1474
1475 use Tk;
1476
8586ce88 1477diff -Nru Tk800.023/tcl2perl Tk800.023.new/tcl2perl
1478--- Tk800.023/tcl2perl Sat Dec 30 17:12:37 2000
1479+++ Tk800.023.new/tcl2perl Sat Sep 1 07:05:34 2001
e98aaa03 1480@@ -1,4 +1,4 @@
1481-#!/usr/local/bin/perl -w
1482+#!/usr/bin/perl -w
1483
1484 # Highly experimental tcl -> perl converter, aimed at eventually
1485 # completeing Tix merge
8586ce88 1486diff -Nru Tk800.023/tcolour Tk800.023.new/tcolour
1487--- Tk800.023/tcolour Sat Dec 30 17:12:37 2000
1488+++ Tk800.023.new/tcolour Sat Sep 1 07:05:34 2001
e98aaa03 1489@@ -1,4 +1,4 @@
1490-#!/usr/local/bin/perl -w
1491+#!/usr/bin/perl -w
1492
1493 use Tk;
1494
8586ce88 1495diff -Nru Tk800.023/text_demo Tk800.023.new/text_demo
1496--- Tk800.023/text_demo Sat Dec 30 17:12:37 2000
1497+++ Tk800.023.new/text_demo Sat Sep 1 07:05:34 2001
e98aaa03 1498@@ -1,4 +1,4 @@
1499-#!/usr/local/bin/perl -w
1500+#!/usr/bin/perl -w
1501
1502 use Tk;
1503 require Tk::Text;
8586ce88 1504diff -Nru Tk800.023/tie_basic Tk800.023.new/tie_basic
1505--- Tk800.023/tie_basic Sat Dec 30 17:12:37 2000
1506+++ Tk800.023.new/tie_basic Sat Sep 1 07:05:34 2001
e98aaa03 1507@@ -1,4 +1,4 @@
1508-#!/usr/local/bin/perl
1509+#!/usr/bin/perl
1510
1511 # use Memory (2440);
1512
8586ce88 1513diff -Nru Tk800.023/tiehandle Tk800.023.new/tiehandle
1514--- Tk800.023/tiehandle Sat Dec 30 17:12:37 2000
1515+++ Tk800.023.new/tiehandle Sat Sep 1 07:05:34 2001
e98aaa03 1516@@ -1,4 +1,4 @@
1517-#!/usr/local/bin/perl -w
1518+#!/usr/bin/perl -w
1519
1520 use Tk;
1521
8586ce88 1522diff -Nru Tk800.023/tietext Tk800.023.new/tietext
1523--- Tk800.023/tietext Sat Dec 30 17:12:37 2000
1524+++ Tk800.023.new/tietext Sat Sep 1 07:05:34 2001
e98aaa03 1525@@ -1,4 +1,4 @@
1526-#!/usr/local/bin/perl -w
1527+#!/usr/bin/perl -w
1528 use Tk;
1529
1530 {package Tk::Text::Contents;
8586ce88 1531diff -Nru Tk800.023/time Tk800.023.new/time
1532--- Tk800.023/time Sat Dec 30 17:12:37 2000
1533+++ Tk800.023.new/time Sat Sep 1 07:05:34 2001
e98aaa03 1534@@ -1,4 +1,4 @@
1535-#!/usr/local/bin/perl -w
1536+#!/usr/bin/perl -w
1537 use Tk::Stats 'Start';
1538 use strict;
1539 use Tk;
8586ce88 1540diff -Nru Tk800.023/tiny Tk800.023.new/tiny
1541--- Tk800.023/tiny Sat Dec 30 17:12:37 2000
1542+++ Tk800.023.new/tiny Sat Sep 1 07:05:34 2001
e98aaa03 1543@@ -1,4 +1,4 @@
1544-#!/usr/local/bin/perl -w
1545+#!/usr/bin/perl -w
1546 use strict;
1547 use Tk;
1548 use Tk::widgets qw(Button);
8586ce88 1549diff -Nru Tk800.023/tixwm_demo Tk800.023.new/tixwm_demo
1550--- Tk800.023/tixwm_demo Sat Dec 30 17:12:37 2000
1551+++ Tk800.023.new/tixwm_demo Sat Sep 1 07:05:34 2001
e98aaa03 1552@@ -1,4 +1,4 @@
1553-#!/usr/local/bin/perl -w
1554+#!/usr/bin/perl -w
1555
1556 use Tk;
1557 use Tk::Dialog;
8586ce88 1558diff -Nru Tk800.023/tkperldoc Tk800.023.new/tkperldoc
1559--- Tk800.023/tkperldoc Sat Dec 30 17:12:37 2000
1560+++ Tk800.023.new/tkperldoc Sat Sep 1 07:05:34 2001
e98aaa03 1561@@ -1,4 +1,4 @@
1562-#!/usr/local/bin/perl -w
1563+#!/usr/bin/perl -w
1564
1565 use strict;
1566 use Tk;
8586ce88 1567diff -Nru Tk800.023/tkpsh Tk800.023.new/tkpsh
1568--- Tk800.023/tkpsh Sat Dec 30 17:12:37 2000
1569+++ Tk800.023.new/tkpsh Sat Sep 1 07:05:34 2001
e98aaa03 1570@@ -1,4 +1,4 @@
1571-#!/usr/local/bin/perl -w
1572+#!/usr/bin/perl -w
1573
1574 require 5.001;
1575 use IO::Handle;
8586ce88 1576diff -Nru Tk800.023/tktail Tk800.023.new/tktail
1577--- Tk800.023/tktail Sat Dec 30 17:12:37 2000
1578+++ Tk800.023.new/tktail Sat Sep 1 07:05:34 2001
e98aaa03 1579@@ -1,4 +1,4 @@
1580-#!/usr/local/bin/perl -w
1581+#!/usr/bin/perl -w
1582 use strict;
1583 use Tk;
1584 use IO::File;
8586ce88 1585diff -Nru Tk800.023/two_main Tk800.023.new/two_main
1586--- Tk800.023/two_main Sat Dec 30 17:12:37 2000
1587+++ Tk800.023.new/two_main Sat Sep 1 07:05:34 2001
e98aaa03 1588@@ -1,4 +1,4 @@
1589-#!/usr/local/bin/perl -w
1590+#!/usr/bin/perl -w
1591
1592 use Tk;
8cfb8b61 1593 use Tk::Xrm;
8586ce88 1594diff -Nru Tk800.023/uninstall Tk800.023.new/uninstall
1595--- Tk800.023/uninstall Sat Dec 30 17:12:37 2000
1596+++ Tk800.023.new/uninstall Sat Sep 1 07:05:34 2001
e98aaa03 1597@@ -1,4 +1,4 @@
1598-#!/usr/local/bin/perl -w
1599+#!/usr/bin/perl -w
1600 BEGIN {exec('perl5.002',$0,@ARGV) unless ($] >= 5.002)}
1601 use Config;
1602 use Getopt::Long;
8586ce88 1603diff -Nru Tk800.023/ventry_demo Tk800.023.new/ventry_demo
1604--- Tk800.023/ventry_demo Sat Dec 30 17:12:37 2000
1605+++ Tk800.023.new/ventry_demo Sat Sep 1 07:16:22 2001
1606@@ -1,4 +1,4 @@
1607-#!/usr/local/bin/perl -w
1608+#!/usr/bin/perl -w
1609 use strict;
1610 use Tk;
1611
1612diff -Nru Tk800.023/xlib_demo Tk800.023.new/xlib_demo
1613--- Tk800.023/xlib_demo Sat Dec 30 17:12:37 2000
1614+++ Tk800.023.new/xlib_demo Sat Sep 1 07:05:34 2001
e98aaa03 1615@@ -1,4 +1,4 @@
1616-#!/usr/local/bin/perl -w
1617+#!/usr/bin/perl -w
1618
1619 use Tk;
1620
Tk - a graphical user interface toolkit for Perl
This page took 0.335376 seconds and 4 git commands to generate.