Browse Source

Just an added comment.

master
freesource 24 years ago
parent
commit
b73a500274
  1. 5
      add-ons/yard/make-debian-X11/pkg/dpkg/make-debian-x11.postinst

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

@ -7,12 +7,15 @@ use strict;
use Debconf::Client::ConfModule ':all'; use Debconf::Client::ConfModule ':all';
if ($ARGV[0] && $ARGV[0] eq "configure") { if ($ARGV[0] && $ARGV[0] eq "configure") {
if (-d "/usr/doc" && !-e "/usr/doc/make-debian-x11" && if (-d "/usr/doc" && !-e "/usr/doc/make-debian-x11" &&
-d "/usr/share/doc/make-debian-x11") { -d "/usr/share/doc/make-debian-x11") {
system "ln -sf ../share/doc/make-debian-x11 /usr/doc/make-debian-x11"; system "ln -sf ../share/doc/make-debian-x11 /usr/doc/make-debian-x11";
} }
} }
my $answer = get("make-debian-x11/make_debian_x11"); my $answer = get("make-debian-x11/make_debian_x11");
if ($answer eq "true") { if ($answer eq "true") {
@ -51,6 +54,8 @@ my $zoneinfo = get("make-debian-x11/make_debian_x11-zoneinfo");
close(SCRIPT); close(SCRIPT);
} }
else { else {
# Not a perfect approach, but the swim package will be updated
# eventually.
print STDERR "Be patient, this will take a little while.\n"; print STDERR "Be patient, this will take a little while.\n";
open (SCRIPT, "|make_debian-X11 2&> /dev/null") open (SCRIPT, "|make_debian-X11 2&> /dev/null")
or warn "Couldn't open make_debian-X11\n"; or warn "Couldn't open make_debian-X11\n";

Loading…
Cancel
Save