From 9779b8db62b8bc037d2992c68e289f691d856559 Mon Sep 17 00:00:00 2001
From: joey <joey@a4a2c43b-8ac3-0310-8836-e0e880c912e2>
Date: Fri, 21 Apr 2000 08:48:01 +0000
Subject: [PATCH] rpms can be built now.

Call init first because it may set up variables that are used by scan.
---
 Alien/Package.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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;
 }