Parent Directory | Revision Log | Patch
revision 10 by dpavlin, Fri May 5 21:18:58 2006 UTC | revision 23 by dpavlin, Fri May 26 18:40:47 2006 UTC | |
---|---|---|
# | Line 23 sub run { | Line 23 sub run { |
23 | password => 'admin', | password => 'admin', |
24 | ); | ); |
25 | ||
26 | $u->create( | |
27 | name => 'Normal User', | |
28 | email => 'user@example.com', | |
29 | password => 'user', | |
30 | ); | |
31 | ||
32 | my $s = Transports::Model::Source->new(current_user => $system_user); | my $s = Transports::Model::Source->new(current_user => $system_user); |
33 | $s->create( | $s->create( |
34 | name => 'SRC/1', | name => 'SRC/1', |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |