allow an empty exporttype so you can create new objects
authorivan <ivan>
Tue, 26 Oct 2004 12:07:26 +0000 (12:07 +0000)
committerivan <ivan>
Tue, 26 Oct 2004 12:07:26 +0000 (12:07 +0000)
FS/FS/part_export.pm

index 1e0b905..3f677b2 100644 (file)
@@ -390,8 +390,9 @@ sub _rebless {
   my $exporttype = $self->exporttype;
   my $class = ref($self). "::$exporttype";
   eval "use $class;";
-  die $@ if $@;
-  bless($self, $class);
+  #die $@ if $@;
+  bless($self, $class) unless $@;
+  $self;
 }
 
 #these should probably all go away, just let the subclasses define em