diff options
-rw-r--r-- | MANIFEST | 4 | ||||
-rw-r--r-- | eg/cgi/dna_small_gif.uu (renamed from eg/cgi/dna.small.gif.uu) | 2 | ||||
-rw-r--r-- | eg/cgi/wilogo_gif.uu (renamed from eg/cgi/wilogo.gif.uu) | 0 | ||||
-rw-r--r-- | ext/B/defsubs_h.PL | 1 |
4 files changed, 3 insertions, 4 deletions
@@ -91,7 +91,7 @@ eg/cgi/cookie.cgi CGI example eg/cgi/crash.cgi CGI example eg/cgi/customize.cgi CGI example eg/cgi/diff_upload.cgi CGI example -eg/cgi/dna.small.gif.uu Small image for CGI examples +eg/cgi/dna_small_gif.uu Small image for CGI examples eg/cgi/file_upload.cgi CGI example eg/cgi/frameset.cgi CGI example eg/cgi/index.html Index page for CGI examples @@ -104,7 +104,7 @@ eg/cgi/nph-multipart.cgi CGI example eg/cgi/popup.cgi CGI example eg/cgi/save_state.cgi CGI example eg/cgi/tryit.cgi CGI example -eg/cgi/wilogo.gif.uu Small image for CGI examples +eg/cgi/wilogo_gif.uu Small image for CGI examples eg/changes A program to list recently changed files eg/client A sample client eg/down A program to do things to subdirectories diff --git a/eg/cgi/dna.small.gif.uu b/eg/cgi/dna_small_gif.uu index d3ce24c18d..1745c73761 100644 --- a/eg/cgi/dna.small.gif.uu +++ b/eg/cgi/dna_small_gif.uu @@ -1,4 +1,4 @@ -begin 444 dna.small.gif +begin 444 dna_small.gif M1TE&.#=A)0`J`.<``+9%&Y<R0M<F'ID\,!<07%<G1:P<0Q`A2Q`P;"L9/L$: M,"480N5"&RL7:4LD0T,G144[7BHL2B4?3\0I+"</)BQ.9KD0/S878\96$Z\@ M(:\1*RL:3L0W&QL?2#4?9>@_&A$_5<I"&C`A3*,3-A`//9X<)\@Q(L`@.#\E diff --git a/eg/cgi/wilogo.gif.uu b/eg/cgi/wilogo_gif.uu index c5d10423b4..c5d10423b4 100644 --- a/eg/cgi/wilogo.gif.uu +++ b/eg/cgi/wilogo_gif.uu diff --git a/ext/B/defsubs_h.PL b/ext/B/defsubs_h.PL index 78c82f20bd..dc4275beae 100644 --- a/ext/B/defsubs_h.PL +++ b/ext/B/defsubs_h.PL @@ -3,7 +3,6 @@ # Extracting defsubs.h (with variable substitutions) #!perl my ($out) = __FILE__ =~ /(^.*)\.PL/; -if ($^O eq 'VMS') { ($out) = __FILE__ =~ /^(.+)_PL$/i; } $out =~ s/_h$/.h/; open(OUT,">$out") || die "Cannot open $file:$!"; print "Extracting $out...\n"; |