os2/diff.installman

   1 *** installman.orig     Thu Jun 22 10:42:40 1995
   2 --- installman  Thu Nov 02 04:07:38 1995
   3 ***************
   4 *** 6,11 ****
   5 --- 6,12 ----
   6   require Cwd;
   7
   8   umask 022;
   9 + $ENV{SHELL} = 'sh' if $Config{osname} eq 'os2';
  10
  11   $ver = $];
  12   $release = substr($ver,0,3);   # Not used presently.
  13 ***************
  14 *** 38,48 ****
  15
  16   #Sanity checks
  17
  18 ! -x  "./perl"  || warn "./perl not found!  Have you run make?\n";
  19   -d  $Config{'installprivlib'}
  20         || warn "Perl library directory $Config{'installprivlib'} not found.
  21                 Have you run make install?.  (Installing anyway.)\n";
  22 ! -x 't/TEST'           || warn "WARNING: You've never run 'make test'!!!",
  23         "  (Installing anyway.)\n";
  24
  25   # Install the main pod pages.
  26 --- 39,50 ----
  27
  28   #Sanity checks
  29
  30 ! -x  "./perl$Config{exe_ext}"
  31 !   or warn "./perl$Config{exe_ext} not found!  Have you run make?\n";
  32   -d  $Config{'installprivlib'}
  33         || warn "Perl library directory $Config{'installprivlib'} not found.
  34                 Have you run make install?.  (Installing anyway.)\n";
  35 ! -x "t/perl$Config{exe_ext}"           || warn "WARNING: You've never run 'make test'!!!",
  36         "  (Installing anyway.)\n";
  37
  38   # Install the main pod pages.
  39 ***************
  40 *** 66,72 ****
  41       # are enhancements or changes from previous installed versions.
  42       # The error message doesn't include the '..' because the user
  43       # won't be aware that we've chdir to $poddir.
  44 !     -x  "../pod/pod2man" || die "Executable pod/pod2man not found.\n";
  45
  46       # We want to be sure to use the current perl.  We can't rely on
  47       # the installed perl because it might not be actually installed
  48 --- 68,74 ----
  49       # are enhancements or changes from previous installed versions.
  50       # The error message doesn't include the '..' because the user
  51       # won't be aware that we've chdir to $poddir.
  52 !     -r  "../pod/pod2man" || die "Executable pod/pod2man not found.\n";
  53
  54       # We want to be sure to use the current perl.  We can't rely on
  55       # the installed perl because it might not be actually installed
  56 ***************
  57 *** 86,92 ****
  58         # Convert name from  File/Basename.pm to File::Basename.3 format,
  59         # if necessary.
  60         $manpage =~ s#\.p(m|od)$##;
  61 !       $manpage =~ s#/#::#g;
  62         $manpage = "${mandir}/${manpage}.${manext}";
  63         # Print $release $patchlevel stuff?  or should pod2man do that?
  64         &cmd("$pod2man $mod > $manpage");
  65 --- 88,98 ----
  66         # Convert name from  File/Basename.pm to File::Basename.3 format,
  67         # if necessary.
  68         $manpage =~ s#\.p(m|od)$##;
  69 !       if ($Config{osname} eq "os2") {
  70 !         $manpage =~ s#/#.#g;
  71 !       } else {
  72 !         $manpage =~ s#/#::#g;
  73 !       }
  74         $manpage = "${mandir}/${manpage}.${manext}";
  75         # Print $release $patchlevel stuff?  or should pod2man do that?
  76         &cmd("$pod2man $mod > $manpage");