Annotation of loncom/UPDATE, revision 1.4
1.1 albertel 1: #!/usr/bin/perl
2: my $script=<<CMD;
3: touch loncom/build/WARNINGS
1.2 albertel 4: rm -f WARNINGS
1.1 albertel 5: ln -s loncom/build/WARNINGS WARNINGS
6: cd loncom/build;make build
7: make rawinstall
8: make configinstall
9: make updatequery
10: make hosts_and_domain_tab
1.4 ! raeburn 11: make removenolongerused
1.1 albertel 12: make postinstall
13: make run_searchcat
14: CMD
15: my @commands=split(/[\n;]/,$script);
16: foreach $cmd (@commands) {
17: if ($cmd =~ /^cd\s+(\S*)/) {
18: chdir($1);
19: } elsif (0 != system("$cmd")) {
20: open(WARN,">>WARNINGS");
21: my $error = '**** ERROR **** command "'.$cmd.'" failed'.$/;
22: print WARN ($error);
23: print($error);
24: last;
25: }
26: }
27: system('make warningnote');
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>