Index: lib/Padre/Action/Run.pm
===================================================================
--- lib/Padre/Action/Run.pm	(revision 8832)
+++ lib/Padre/Action/Run.pm	(working copy)
@@ -71,6 +71,15 @@
 			$_[0]->on_run_command;
 		},
 	);
+	Padre::Action->new(
+		name       => 'run.run_TDD_tests',
+		label      => Wx::gettext('TDD all Tests'),
+		comment    => Wx::gettext('Builds the current project, then run all tests.'),
+		shortcut   => 'Ctrl-Shift-F5',
+		menu_event => sub {
+			$_[0]->on_run_tdd_tests;
+		},
+	);
 
 	Padre::Action->new(
 		name        => 'run.run_tests',
Index: lib/Padre/Wx/Menu/Run.pm
===================================================================
--- lib/Padre/Wx/Menu/Run.pm	(revision 8832)
+++ lib/Padre/Wx/Menu/Run.pm	(working copy)
@@ -49,6 +49,11 @@
 		$self,
 		'run.run_tests',
 	);
+	
+	$self->{run_TDD_tests} = $self->add_menu_action(
+		$self,
+		'run.run_TDD_tests',
+	);
 
 	$self->{run_this_test} = $self->add_menu_action(
 		$self,
@@ -94,6 +99,11 @@
 		? $self->{run_command}->IsEnabled
 		: 0
 	);
+	$self->{run_TDD_tests}->Enable(
+		  $document && defined( $document->filename ) && $document->filename =~ /\.t$/
+		? $self->{run_command}->IsEnabled
+		: 0
+	);
 
 	return 1;
 }