summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
bf26883)
Fixed Jesse's last name.
git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@210
48953598-375a-da11-a14b-
00016c27c3ee
$config->ok_tables || $config->ok_tables( $config->display_tables );
$config->ok_tables( { map { $_ => 1 } @{ $config->ok_tables } } )
if ref $config->ok_tables eq "ARRAY";
$config->ok_tables || $config->ok_tables( $config->display_tables );
$config->ok_tables( { map { $_ => 1 } @{ $config->ok_tables } } )
if ref $config->ok_tables eq "ARRAY";
- warn "We don't have that table ($self->{table})"
+ warn "We don't have that table ($self->{table}).\n".
+ "Available tables are: ".join (",", @{ $config->{display_tables} })
if $self->debug
and not $config->ok_tables->{ $self->{table} };
return DECLINED() unless exists $config->ok_tables->{ $self->{table} };
if $self->debug
and not $config->ok_tables->{ $self->{table} };
return DECLINED() unless exists $config->ok_tables->{ $self->{table} };
-Danijel Milicevic, Jesse Scheidlower, Jody Belka, Marcus Ramberg,
+Danijel Milicevic, Jesse Sheidlower, Jody Belka, Marcus Ramberg,
Mickael Joanne, Simon Flack, Veljko Vidovic and all the others who've
helped.
Mickael Joanne, Simon Flack, Veljko Vidovic and all the others who've
helped.