1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
|
#! /usr/bin/perl
# -*- Mode: Perl -*-
# debian.postinst ---
# Author : Manoj Srivastava ( srivasta@pilgrim.umass.edu )
# Created On : Sat Apr 27 05:55:26 1996
# Created On Node : melkor.pilgrim.umass.edu
# Last Modified By : Manoj Srivastava
# Last Modified On : Mon Jun 2 15:15:14 1997
# Last Machine Used: tiamat.datasync.com
# Update Count : 31
# Status : Unknown, Use with caution!
# HISTORY :
# Description :
#
#
#
# $Id: postinst,v 1.2 1997/06/03 03:32:44 srivasta Exp $
#
$|=1;
# Predefined values:
my $ret;
my $confcmd = "/usr/sbin/kernel-packageconfig";
# Ignore all invocations uxcept when called on to configure.
exit 0 unless $ARGV[0] =~ /configure/;
# most of our work is done in /etc
chdir("/etc") or die "could not chdir to /etc:$!\n";
-x "$confcmd" ||
die "Garbled installation: Could not find $confcmd";
$ret = system "$confcmd";
if ($ret) {
my $ans;
print "There was an error running $confcmd, and the package maybe \n";
print "misconfigured. Please run $confcmd by hand, or edit the file \n";
print "/etc/kernel-pkg.conf by hand.\n";
exit (1);
}
exit (0);
__END__
|
