1. Herbert Breunung
  2. Kephra

Source

Kephra / lib / Kephra / App / Bar / Search.pm

use strict;
use warnings;

package Kephra::App::Bar::Search;
our @ISA = 'Wx::Panel';

sub new {
	my( $class, $parent) = @_;
	my $sb = $class->SUPER::new($parent, -1, [-1,-1],[-1, 30]);

	my $sizer = Wx::BoxSizer->new( &Wx::wxVERTICAL );
	$sizer->Add($bar, 1, Wx::wxGROW, 0);
	$sb->SetSizer($sizer);


    return $sb;
}


1;