|
|
@ -44,6 +44,10 @@ |
|
|
|
# - Important 1.3.1 bug report and several good questions now incorporated |
|
|
|
# in the FAQ. Noted an erroneous explanation for a FAQ question in 1.3.2. |
|
|
|
# |
|
|
|
# Stian Skjelstad <stian@nixia.no> |
|
|
|
# - Observed that @INC wasn't working properly with rpm based dists with |
|
|
|
# 1.4.0. |
|
|
|
# |
|
|
|
# [ Supporters and Users ] |
|
|
|
# Ben Carrell <ben@xmission.com> |
|
|
|
# - Great compliments. |
|
|
@ -244,40 +248,38 @@ BEGIN { |
|
|
|
$ENV{'PATH'} = "$pwd/user-mode-linux/usr/lib\/uml:" . $ENV{'PATH'}; |
|
|
|
} |
|
|
|
|
|
|
|
} |
|
|
|
|
|
|
|
use BootRoot::Options; |
|
|
|
option(); |
|
|
|
use BootRoot::Options; |
|
|
|
option(); |
|
|
|
|
|
|
|
$::commandline = \%option if %option; |
|
|
|
$::commandline = $ARGV[0] if $ARGV[0]; |
|
|
|
$::commandline = \%option if %option; |
|
|
|
$::commandline = $ARGV[0] if $ARGV[0]; |
|
|
|
|
|
|
|
if ( $option{home} && !$option{template} ) { |
|
|
|
undef $::commandline; |
|
|
|
$option{gui_mode} = $option{home}; |
|
|
|
undef $option{home}; |
|
|
|
} |
|
|
|
|
|
|
|
if ( $Getopt::Long::error > 0 ) { |
|
|
|
if ( $option{home} && !$option{template} ) { |
|
|
|
undef $::commandline; |
|
|
|
$option{gui_mode} = $option{home}; |
|
|
|
undef $option{home}; |
|
|
|
} |
|
|
|
|
|
|
|
exit; |
|
|
|
if ( $Getopt::Long::error > 0 ) { |
|
|
|
|
|
|
|
} |
|
|
|
exit; |
|
|
|
|
|
|
|
} |
|
|
|
|
|
|
|
if ( !%option || $option{gui_mode} ) { |
|
|
|
if ( !$::commandline ) { |
|
|
|
|
|
|
|
use Gtk; |
|
|
|
init Gtk; |
|
|
|
set_locale Gtk; |
|
|
|
if ( !%option || $option{gui_mode} ) { |
|
|
|
if ( !$::commandline ) { |
|
|
|
|
|
|
|
} |
|
|
|
use Gtk; |
|
|
|
init Gtk; |
|
|
|
set_locale Gtk; |
|
|
|
|
|
|
|
} |
|
|
|
|
|
|
|
} |
|
|
|
|
|
|
|
|
|
|
|
use strict; |
|
|
|
use BootRoot::BootRoot; |
|
|
|
|
|
|
|