head	1.2;
access;
symbols
	RELEASE_4_2_0:1.1.1.1
	RELEASE_4_1_1:1.1.1.1
	RELEASE_4_1_0:1.1.1.1
	RELEASE_3_5_0:1.1.1.1
	RELEASE_4_0_0:1.1.1.1
	RELEASE_3_4_0:1.1.1.1
	RELEASE_3_3_0:1.1.1.1
	RELEASE_3_2_0:1.1.1.1
	RELEASE_3_1_0:1.1.1.1
	RELEASE_2_2_8:1.1.1.1
	RELEASE_3_0_0:1.1.1.1
	RELEASE_2_2_7:1.1.1.1
	RELEASE_2_2_6:1.1.1.1
	RELEASE_2_2_5:1.1.1.1
	RELEASE_2_2_2:1.1.1.1
	v2_2:1.1.1.1
	TATKINS:1.1.1;
locks; strict;
comment	@# @;


1.2
date	2000.12.29.15.42.32;	author kevlo;	state dead;
branches;
next	1.1;

1.1
date	97.05.03.00.22.09;	author jfitz;	state Exp;
branches
	1.1.1.1;
next	;

1.1.1.1
date	97.05.03.00.22.09;	author jfitz;	state Exp;
branches;
next	;


desc
@@


1.2
log
@Upgrade to 3.0.1

PR: 23911
Submitted by: MAINTAINER
@
text
@--- install.pl.orig	Thu Dec 14 17:17:23 1995
+++ install.pl	Fri May  2 20:13:32 1997
@@@@ -12,7 +12,7 @@@@
 
 # usage: install.pl [full_path_to_perl]
 #
-$ENV{'PATH'} = '/usr/ucb:/usr/bin:/bin:/usr/local/bin' ;
+$ENV{'PATH'} = '/usr/bin:/bin:/usr/local/bin' ;
 $ENV{'IFS'} = '' if $ENV{'IFS'} ne '' ;
 
 
@@@@ -21,8 +21,9 @@@@
 ##
        $PERL_LIB_DIR = "/usr/local/lib/perl" ;
        $PERL_BIN_DIR = "/usr/local/bin" ;
-     $SWATCH_BIN_DIR = "/usr/local/etc" ;
+     $SWATCH_BIN_DIR = "/usr/local/bin" ;
      $SWATCH_MAN_DIR = "/usr/local/man" ;
+     $SWATCH_LIB_DIR = "/usr/local/lib" ;
 $SWATCH_PROG_MAN_EXT = "8" ;
 $SWATCH_CONF_MAN_EXT = "5" ;
    $SWATCH_DATA_MODE = 444 ;
@@@@ -30,14 +31,15 @@@@
               $OWNER = "root" ;
               $GROUP = "wheel" ;
    $SWATCH_PROG_NAME = "swatch" ;
+   $SWATCH_CONF_NAME = "swatch.conf" ;
     $SWATCH_PROG_MAN = "swatch.prog.man" ;
     $SWATCH_CONF_MAN = "swatch.conf.man" ;
   $SWATCH_ACTION_LIB = "sw_actions.pl" ;
     $SWATCH_HIST_LIB = "sw_history.pl" ;
 
                 $SED = "/usr/bin/sed" ; 
-               $COPY = "/usr/bin/cp" ;
-	      $CHMOD = "/usr/bin/chmod" ;
+               $COPY = "/bin/cp" ;
+	      $CHMOD = "/bin/chmod" ;
 
 if ( ! -f $SED ) {
     $SED = `which sed` ;
@@@@ -60,7 +62,7 @@@@
 }
 $PERL_BIN_DIR = substr($PERL_BIN_DIR, 0, rindex($PERL_BIN_DIR, '/')) ;
 
-$ready = 0 ;
+$ready = 1 ;
 while (!$ready) {
     &get_some_answers() ;
     &print_values() ;
@@@@ -69,14 +71,13 @@@@
     $ready = 1 if ($ans eq 'y' || $ans eq 'Y') ;
 }
 
-print "\nAre you ready for me to start the installation (y or n)? " ;
-$ans = <STDIN> ; chop $ans ;
-&do_the_install() if ($ans eq 'y' || $ans eq 'Y') ;
+&do_the_install();
 
 
 ##
 ##
 ##
+
 sub get_some_answers {
     local($question) ;
 
@@@@ -139,7 +140,7 @@@@
     &install_it($swatch_uid, $swatch_gid, $SWATCH_DATA_MODE,
 		$SWATCH_PROG_MAN, "$SWATCH_MAN_DIR/man$SWATCH_PROG_MAN_EXT/$SWATCH_PROG_NAME.$SWATCH_PROG_MAN_EXT") ;
     &install_it($swatch_uid, $swatch_gid, $SWATCH_DATA_MODE,
-		$SWATCH_CONF_MAN, "$SWATCH_MAN_DIR/man$SWATCH_CONF_MAN_EXT/$SWATCH_PROG_NAME.$SWATCH_CONF_MAN_EXT") ;
+		$SWATCH_CONF_MAN, "$SWATCH_MAN_DIR/man$SWATCH_CONF_MAN_EXT/$SWATCH_CONF_NAME.$SWATCH_CONF_MAN_EXT") ;
 }
 
 
@


1.1
log
@Initial revision
@
text
@@


1.1.1.1
log
@Import of SWATCH, the Simple WATCHer and filter
@
text
@@
