bike/gbootroot
1
0
Fork 0
mirror of https://github.com/fspc/gbootroot.git synced 2025-04-04 07:43:22 -04:00
Code Issues Projects Releases Wiki Activity

This fixes some variable confusion where $changed_text .. the full path and

Browse Source 
name of the template was being confused with the edited part of the template,
also called $changed_text, now it is called $changed_text_from_template, problem
solved.
This commit is contained in:
freesource 2001-08-01 05:35:42 +00:00
parent f815864df2
commit 6112a38c93
1 changed files with 7 additions and 7 deletions

14
BootRoot/YardBox.pm

@ -39,7 +39,7 @@ my $error;
my ($continue_button,$close_button,$save_button);
my($check,$dep,$space,$create,$test);
my($filename,$filesystem_size,$kernel,$template_dir,$template,$tmp,$mnt);
my ($text, $changed_text);
my ($text, $changed_text, $changed_text_from_template);
my $save_as;
my $filesystem_type = "ext2";
@ -218,7 +218,7 @@ sub yard {
return "ERROR"if $error && $error eq "ERROR";
my @template = <CONTENTS>;
close(CONTENTS);
$changed_text = join("",@template);
$changed_text_from_template = join("",@template);
yard_box();
#}
@ -874,7 +874,7 @@ sub yard_box {
$text->set_editable($true);
$text->signal_connect("activate", sub {
my $new_length = $text->get_length();
$changed_text = $text->get_chars(0,$new_length);
$changed_text_from_template = $text->get_chars(0,$new_length);
} );
$table->attach( $text, 0, 1, 0, 1,
[ 'expand', 'shrink', 'fill' ],
@ -884,7 +884,7 @@ sub yard_box {
$text->show();
$text->freeze();
$text->insert( undef, undef, undef, $changed_text);
$text->insert( undef, undef, undef, $changed_text_from_template);
$text->thaw();
$start_length = $text->get_length();
@ -998,7 +998,7 @@ sub saved {
open(NEW,">$new") or
($error = error("gBootRoot: ERROR: Can't create $new"));
return if $error && $error eq "ERROR";
print NEW $changed_text;
print NEW $changed_text_from_template;
close(NEW);
rename($new, "$template_dir$template") or
($error = error("gBootRoot: ERROR: Can't rename $new to " .
@ -1071,7 +1071,7 @@ sub save_as {
# Here's where we get to undef Yard variable and start over at
# check
my $new = "$template_dir$new_template";
print "$new && $template_dir$template\n";
if (!basename($new)) {
if ( file_mode("$template_dir$template") =~ /l/ ) {
error_window("gBootRoot: ERROR: $template_dir$template is not " .
@ -1091,7 +1091,7 @@ sub save_as {
open(NEW,">$new") or
($error = error("gBootRoot: ERROR: Can't create $new"));
return if $error && $error eq "ERROR";
print NEW $changed_text;
print NEW $changed_text_from_template;
close(NEW);
$template = $new_template;