oops, syntax error in new() check for missing subclass table sub (eek)

diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm
index 5c828b7..6b7997f 100644 (file)
--- a/FS/FS/Record.pm
+++ b/FS/FS/Record.pm
@@ -122,7 +122,7 @@ sub new {
   my $self = {};
   bless ($self, $class);
 
-  unless defined ( $self->table ) {
+  unless ( defined ( $self->table ) ) {
     $self->{'Table'} = shift;
     carp "warning: FS::Record::new called with table name ". $self->{'Table'};
   }