|
From: Brian A. <br...@ta...> - 2000-12-29 23:08:50
|
I could just be having a slow day today, but I am not
sure what your patch is for.
This is what is in the current code:
if ($form->{colorpreview}) {
$colorblock_clean = $colorblock =
join ',', @{$form}{qw[fg0 fg1 fg2 fg3 bg0 bg1 bg2 bg3]};
# the #s will break the url
$colorblock_clean =~ s/#//g;
} else {
$colorblock = $slashdb->getBlock($form->{color_block}, 'block');
}
@colors = split m/,/, $colorblock;
$user->{fg} = [@colors[0..4]];
$user->{bg} = [@colors[5..9]];
$title = getTitle('colorEdit-title');
$block = $slashdb->getDescriptions('color_block', '', 1);
$color_select = createSelect('color_block', $block,
$form->{color_block}, 1);
slashDisplay('colorEdit', {
title => $title,
colorblock_clean => $colorblock_clean,
colors => \@colors,
color_select => $color_select,
});
|