Padre

 view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

    - Added main window activation hook to rescan the directory tree, rerun
      syntax checking, and rerun vcs indicators (ADAMK)
    - Hitting enter in the Function List search box will clear the search after
      you have been taken to the first function (ADAMK)
    - When Find Fast is closed, return scroll and selection to the original
      location (ADAMK)
    - Syntax check status is reflected in the label for the Syntax Check output
      so you can see the result when it is not at the front (ADAMK)
    - When syntax check fails, only show markers for the errors in the file that
      is being displayed in the editor (ADAMK)
    - The replace_term history combobox class no longer prepopulates with an
      assumed replace term you probably don't want (ADAMK)
    - Recursive search and replace dialogs support type filtering (ADAMK)
    - Hex/decimal conversion: make error message generic (ZENOG)
    - Plugin manager: complete translation (ZENOG)
    - Update German translation (ZENOG)
    - HTML for Padre::Wx::HtmlWindow is rendered in the background (ADAMK)
    - Clicking on a result from a Find in Files search will now find the
      correct line even if it has moved since the search was run (ADAMK)
    - The context menu now correctly appears at the cursor on Win32 (ADAMK)
    - Changed the order of the context menu entries to more closely match

MANIFEST  view on Meta::CPAN

t/36_task_eval.t
t/37_task_signal.t
t/38_task_manager.t
t/39_task_nothreads.t
t/40_display.t
t/41_editor.t
t/42_document.t
t/43_frame_html.t
t/50_browser.t
t/61_directory_path.t
t/74_history_combobox.t
t/75_autocomplete.t
t/76_preferences.t
t/82_plugin_manager.t
t/83_autosave.t
t/85_commandline.t
t/90_autocomplete.t
t/91_vi.t
t/92_padre_file.t
t/93_padre_filename_win.t
t/94_padre_file_remote.t

Padre.fbp  view on Meta::CPAN

                                <property name="tooltip"></property>
                                <property name="validator_data_type"></property>
                                <property name="validator_style">wxFILTER_NONE</property>
                                <property name="validator_type">wxDefaultValidator</property>
                                <property name="validator_variable"></property>
                                <property name="value"></property>
                                <property name="window_extra_style"></property>
                                <property name="window_name"></property>
                                <property name="window_style"></property>
                                <event name="OnChar"></event>
                                <event name="OnCombobox">on_combobox</event>
                                <event name="OnEnterWindow"></event>
                                <event name="OnEraseBackground"></event>
                                <event name="OnKeyDown"></event>
                                <event name="OnKeyUp"></event>
                                <event name="OnKillFocus"></event>
                                <event name="OnLeaveWindow"></event>
                                <event name="OnLeftDClick"></event>
                                <event name="OnLeftDown"></event>
                                <event name="OnLeftUp"></event>
                                <event name="OnMiddleDClick"></event>

lib/Padre/Wx/ComboBox/History.pm  view on Meta::CPAN

package Padre::Wx::ComboBox::History;

=pod

=head1 NAME

Padre::Wx::ComboBox::History - A history-enabled Wx combobox

=head1 SYNOPSIS

  $dialog->{search_text} = Padre::Wx::ComboBox::History->new(
      $self,
      -1,
      '', # Use the last history value
      Wx::DefaultPosition,
      Wx::DefaultSize,
      [ 'search' ], # The history queue to read from

lib/Padre/Wx/ComboBox/History.pm  view on Meta::CPAN

			$self->Append($text);
		}
	}
	foreach my $option (@recent) {
		$self->Append($option);
	}

	return 1;
}

# Save the current value of the combobox and return it as per GetValue
sub SaveValue {
	my $self  = shift;
	my $value = $self->GetValue;

	# If this is a value is not in our existing recent list, save it
	if ( length $value ) {
		if ( $self->FindString($value) == Wx::NOT_FOUND ) {
			Padre::DB::History->create(
				type => $self->{type},
				name => $value,

lib/Padre/Wx/Constant.pm  view on Meta::CPAN

	:aui
	:bitmap
	:button
	:bookctrl
	:brush
	:checkbox
	:choicebook
	:clipboard
	:collapsiblepane
	:colour
	:combobox
	:comboctrl
	:constraints
	:control
	:dc
	:dialog
	:dirctrl
	:dirdialog
	:dnd
	:filedialog
	:font

lib/Padre/Wx/Constant.pm  view on Meta::CPAN

	:keycode
	:layout
	:listbook
	:listbox
	:listctrl
	:locale
	:menu
	:miniframe
	:misc
	:notebook
	:ownerdrawncombobox
	:palette
	:panel
	:pen
	:power
	:process
	:progressdialog
	:radiobox
	:radiobutton
	:richtextctrl
	:sashwindow

lib/Padre/Wx/Dialog/Expression.pm  view on Meta::CPAN

	Padre::Wx::FBP::Expression
};





######################################################################
# Event Handlers

sub on_combobox {
	return 1;
}

sub on_text {
	my $self  = shift;
	my $event = shift;
	if ( $self->{watch}->GetValue ) {
		$self->{watch}->SetValue(0);
		$self->watch_clicked;
	}

lib/Padre/Wx/Dialog/OpenURL.pm  view on Meta::CPAN

		$main,
		-1,
		Wx::gettext('Open URL'),
		Wx::DefaultPosition,
		Wx::DefaultSize,
		Wx::CAPTION | Wx::CLOSE_BOX | Wx::SYSTEM_MENU
	);

	# Form Components

	# Input combobox for the URL
	$self->{openurl_text} = Wx::ComboBox->new(
		$self,
		-1,
		"",
		Wx::DefaultPosition,
		Wx::DefaultSize,
		[],
		Wx::CB_DROPDOWN
	);
	$self->{openurl_text}->SetSelection(-1);

lib/Padre/Wx/FBP/Expression.pm  view on Meta::CPAN

			"Padre::Wx::Display->dump",
			"\\\@INC, \\%INC",
		],
		Wx::TE_PROCESS_ENTER,
	);

	Wx::Event::EVT_COMBOBOX(
		$self,
		$self->{code},
		sub {
			shift->on_combobox(@_);
		},
	);

	Wx::Event::EVT_TEXT(
		$self,
		$self->{code},
		sub {
			shift->on_text(@_);
		},
	);

lib/Padre/Wx/FBP/Expression.pm  view on Meta::CPAN

	my $bSizer35 = Wx::BoxSizer->new(Wx::VERTICAL);
	$bSizer35->Add( $bSizer36, 0, Wx::EXPAND, 3 );
	$bSizer35->Add( $self->{output}, 1, Wx::ALL | Wx::EXPAND, 5 );

	$self->SetSizerAndFit($bSizer35);
	$self->Layout;

	return $self;
}

sub on_combobox {
	$_[0]->main->error('Handler method on_combobox for event code.OnCombobox not implemented');
}

sub on_text {
	$_[0]->main->error('Handler method on_text for event code.OnText not implemented');
}

sub on_text_enter {
	$_[0]->main->error('Handler method on_text_enter for event code.OnTextEnter not implemented');
}

t/74_history_combobox.t  view on Meta::CPAN

}

use Test::NoWarnings;
use t::lib::Padre;
use Test::MockObject;

use Padre::Wx;


# Startup
my $mock_history_combobox = Test::MockObject->new();
$mock_history_combobox->set_isa('Wx::ComboBox');

use_ok('Padre::Wx::ComboBox::History');

SCOPE: {

	# Check item added to history when not already found

	# GIVEN
	$mock_history_combobox->set_always( 'FindString', Wx::wxNOT_FOUND );
	$mock_history_combobox->set_always( 'GetValue',   'foo' );
	$mock_history_combobox->{type} = 'test1';

	# WHEN
	my $value = Padre::Wx::ComboBox::History::SaveValue($mock_history_combobox);

	# THEN
	is( $value, 'foo', "SaveValue returned correct value" );
	my @history = Padre::DB::History->recent('test1');
	is( scalar @history, 1,     "One item in history list" );
	is( $history[0],     'foo', "Correct value in history" );
}

SCOPE: {

	# Check item not added to history when already exists

	# GIVEN
	$mock_history_combobox->set_always( 'FindString', 0 );
	$mock_history_combobox->{type} = 'test2';

	# WHEN
	my $value = Padre::Wx::ComboBox::History::SaveValue($mock_history_combobox);

	# THEN
	is( $value, 'foo', "SaveValue returned correct value" );
	my @history = Padre::DB::History->recent('test2');
	is( scalar @history, 0, "Item not recorded in history" );
}

1;



( run in 1.487 second using v1.01-cache-2.11-cpan-39bf76dae61 )