Browse Source

Before fset was creating some probs.

master
freesource 23 years ago
parent
commit
37e1bdbf6b
  1. 2
      add-ons/yard/make-debian-X11/pkg/dpkg/control
  2. 14
      add-ons/yard/make-debian-X11/pkg/dpkg/make-debian-x11.config
  3. 13
      add-ons/yard/make-debian-X11/pkg/dpkg/make-debian-x11.postinst

2
add-ons/yard/make-debian-X11/pkg/dpkg/control

@ -7,7 +7,7 @@ Standards-Version: 3.5.2
Package: make-debian-x11
Architecture: all
Depends: gbootroot (>= 1.3.12), swim, debconf
Depends: gbootroot (>= 1.2.13), swim, debconf
Description: BootRoot add-on.
This add-on is an enhanced make_debian script which creates a template for
gBootRoot's Yard Method. The root filesystem created from this script

14
add-ons/yard/make-debian-X11/pkg/dpkg/make-debian-x11.config

@ -6,11 +6,13 @@
use strict;
use Debconf::Client::ConfModule ':all';
fset("make-debian-x11/close_gbootroot_down","seen","false");
# fset is just used for testing
#fset("make-debian-x11/close_gbootroot_down","seen","false");
input("medium","make-debian-x11/close_gbootroot_down");
go();
fset("make-debian-x11/make_debian_x11","seen","false");
#fset("make-debian-x11/make_debian_x11","seen","false");
input("medium","make-debian-x11/make_debian_x11");
go();
@ -24,7 +26,7 @@ if ($answer eq "true") {
open(SWIM,$swim) or warn "Had trouble using swim: $!\n";
while (<SWIM>) {
if ($_ eq "file init is not owned by any package\n") {
fset("make-debian-x11/make_debian_x11-swim","seen","false");
#fset("make-debian-x11/make_debian_x11-swim","seen","false");
input("medium","make-debian-x11/make_debian_x11-swim");
go();
}
@ -32,16 +34,16 @@ if ($answer eq "true") {
close(SWIM);
fset("make-debian-x11/make_debian_x11-doc","seen","false");
#fset("make-debian-x11/make_debian_x11-doc","seen","false");
input("medium","make-debian-x11/make_debian_x11-doc");
go();
fset("make-debian-x11/make_debian_x11-zoneinfo","seen","false");
#fset("make-debian-x11/make_debian_x11-zoneinfo","seen","false");
input("medium","make-debian-x11/make_debian_x11-zoneinfo");
go();
}
stop();

13
add-ons/yard/make-debian-X11/pkg/dpkg/make-debian-x11.postinst

@ -57,7 +57,7 @@ my $zoneinfo = get("make-debian-x11/make_debian_x11-zoneinfo");
# Not a perfect approach, but the swim package will be updated
# eventually.
print STDERR "Be patient, this will take a little while.\n";
open (SCRIPT, "|make_debian-X11 2&> /dev/null")
open (SCRIPT, "|make_debian-X11")
or warn "Couldn't open make_debian-X11\n";
print SCRIPT $swim;
print SCRIPT $doc;
@ -68,4 +68,15 @@ my $zoneinfo = get("make-debian-x11/make_debian_x11-zoneinfo");
}
stop();

Loading…
Cancel
Save