id	summary	reporter	owner	description	type	status	priority	milestone	component	version	resolution	keywords	cc
890	"""Introduce Temporary Variable"" need to be fixed"	jagd		"This is a code piece from the Wx examples,  just put the cursor there and click Refactor->Introduce Temporary Variable :


{{{

sub new {
	my ($class) = @_;
#<-------- CURSOR HERE
	my $self = $class->SUPER::new(
		undef, -1,
		'Demo::App',
		wxDefaultPosition, wxDefaultSize,
	);

	my $button = Wx::Button->new( $self, -1, ""Press here"" );

	EVT_BUTTON( $self, $button, sub { print ""button pressed\n"" } );

	$self->SetSize( $button->GetSizeWH );

	return $self;
}


}}}"	defect	new	minor		Refactoring Perl 5	0.58		Introduce Temporary