--- trunk/lib/Frey/Run.pm	2008/10/31 23:10:08	221
+++ trunk/lib/Frey/Run.pm	2008/10/31 23:17:56	222
@@ -2,6 +2,7 @@
 use Moose;
 extends 'Frey';
 with 'Frey::Web';
+with 'Frey::Config';
 
 =head1 NAME
 
@@ -44,7 +45,11 @@
 
 	if ( @required ) {
 		$html = qq|<h1>Required params for $class</h1><form method="post">|;
-		$html .= qq|<label for="$_">$_</label><input type="text" name="$_">| foreach @required;
+		foreach my $name ( @required ) {
+			my $type = $name =~ m/^pass/ ? 'password' : 'text';
+			my $value = $self->config($class)->{$name};
+			$html .= qq|<label for="$name">$name</label><input type="$type" name="$name" value="$value">|;
+		}
 		$html .= qq|<input type="submit" value="Run $class"></form>|;
 	} else {
 		my $o = $class->new( %params );