mirror of https://github.com/fspc/gbootroot.git
freesource
24 years ago
1 changed files with 0 additions and 15 deletions
@ -1,15 +0,0 @@ |
|||||
#!/usr/bin/perl |
|
||||
|
|
||||
print "Please enter your Hosts ip: "; |
|
||||
my $answer = <STDIN>; |
|
||||
chomp $answer; |
|
||||
$ENV{DISPLAY} = "$answer:0"; |
|
||||
system "Xnest&"; |
|
||||
|
|
||||
$ENV{DISPLAY} = ":0"; |
|
||||
system "flwm&"; |
|
||||
system "gbootroot&"; |
|
||||
|
|
||||
sleep(5); |
|
||||
print "That's it\n"; |
|
||||
system "xsetroot -display :0 -solid Orange"; |
|
Loading…
Reference in new issue