diff --git a/Alien/Package.pm b/Alien/Package.pm
index 1c3f952..2637662 100644
--- a/Alien/Package.pm
+++ b/Alien/Package.pm
@@ -141,8 +141,8 @@ sub new {
 	my $proto = shift;
 	my $class = ref($proto) || $proto;
 	my $this=bless ({}, $class);
-	$this->$_(shift) while $_=shift; # run named parameters as methods
 	$this->init;
+	$this->$_(shift) while $_=shift; # run named parameters as methods
 	return $this;
 }