Commit 418152bd authored by Mac Newbold's avatar Mac Newbold

(Oops... I don't remember what I changed!)

parent bae9cc6e
......@@ -23,10 +23,10 @@ $main->configure(-background => $main_bg );
#add some frames
my $msg_frm =
$main->Frame( -relief=>'sunken', -borderwidth=>2, -background=>$main_bg
)->pack(-side=>'bottom', -fill=>'x');
)->pack(-side=>'bottom',-expand=>'1', -fill=>'x');
my $msg_area =
$msg_frm->Label(-background=>$main_bg, -anchor=>'nw', -width=>'30')
->pack(-side=>'left', -anchor=>'nw');
$msg_frm->Label(-background=>$main_bg, -anchor=>'nw')
my $frm =
$main->Frame( -relief=>'flat', -background=>$main_bg
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment