From c179473a95db2ee56858ab01ca7b18402e860170 Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Mon, 19 Mar 2012 01:09:46 -0500
Subject: stop using moosex::getopt

---
 bin/lastfm_export    | 10 ++++++----
 lib/LastFM/Export.pm |  2 --
 2 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/bin/lastfm_export b/bin/lastfm_export
index 2e56809..eb721da 100644
--- a/bin/lastfm_export
+++ b/bin/lastfm_export
@@ -9,12 +9,14 @@ use Getopt::Long qw(:config pass_through);
 use LastFM::Export;
 use Term::ProgressBar;
 
-my ($dsn, $quiet);
+my ($dsn, $user, $quiet);
 GetOptions(
-    'dsn=s' => \$dsn,
-    'quiet' => \$quiet,
+    'dsn=s'  => \$dsn,
+    'user=s' => \$user,
+    'quiet'  => \$quiet,
 );
 die "--dsn is required" unless $dsn;
+die "--user is required" unless $user;
 
 my $dbh = DBI->connect($dsn, '', '', { RaiseError => 1, AutoCommit => 0 });
 my $from = 0;
@@ -32,7 +34,7 @@ else {
     ($from) = $dbh->selectrow_array('SELECT timestamp FROM tracks ORDER BY timestamp DESC LIMIT 1');
 }
 
-my $exporter = LastFM::Export->new_with_options;
+my $exporter = LastFM::Export->new(user => $user);
 
 my $track_count = $exporter->track_count(from => $from);
 if (!$track_count) {
diff --git a/lib/LastFM/Export.pm b/lib/LastFM/Export.pm
index 24b2829..aee245c 100644
--- a/lib/LastFM/Export.pm
+++ b/lib/LastFM/Export.pm
@@ -5,8 +5,6 @@ use Moose;
 use Data::Stream::Bulk::Callback;
 use Net::LastFM;
 
-with 'MooseX::Getopt';
-
 =head1 SYNOPSIS
 
   use LastFM::Export;
-- 
cgit v1.2.3