From: Robert 'phaylon' Sedlacek <r.sedlacek@shadowcat.co.uk>
Date: Mon, 7 May 2012 18:37:32 +0000 (+0000)
Subject: accept constructor arguments
X-Git-Tag: v0.001_001~128
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=72d4f529736d58e90eae0f5987295cd0187ea27e;p=scpubgit%2FSystem-Introspector.git

accept constructor arguments
---

diff --git a/dev-gather.pl b/dev-gather.pl
index 0469777..3c9657d 100755
--- a/dev-gather.pl
+++ b/dev-gather.pl
@@ -7,4 +7,4 @@ use Module::Runtime qw( use_module );
 my $intro = shift(@ARGV)
     or die "Probe argument required\n";
 
-pp(use_module("System::Introspector::$intro")->new->gather);
+pp(use_module("System::Introspector::$intro")->new(@ARGV)->gather);