Parent Directory
| 
Revision Log
| 
Patch
| revision 1.1 by joko, Wed Nov 13 18:50:41 2002 UTC | revision 1.2 by joko, Wed Nov 13 21:24:24 2002 UTC | |
|---|---|---|
| # | Line 1502 sub IDENTIFIER { | Line 1502 sub IDENTIFIER { |
| 1502 | } | } |
| 1503 | return 1 if $id =~ /^".+?"$/s; # QUOTED IDENTIFIER | return 1 if $id =~ /^".+?"$/s; # QUOTED IDENTIFIER |
| 1504 | my $err = "Bad table or column name '$id' "; # BAD CHARS | my $err = "Bad table or column name '$id' "; # BAD CHARS |
| 1505 | if ($id =~ /\W/) { | if ($id !~ /\w|\./) { |
| 1506 | $err .= "has chars not alphanumeric or underscore!"; | $err .= "has chars not alphanumeric or underscore!"; |
| 1507 | return $self->do_err( $err ); | return $self->do_err( $err ); |
| 1508 | } | } |
|
||||||||
| MailToCvsAdmin">MailToCvsAdmin | ViewVC Help |
| Powered by ViewVC 1.1.26 |  |