create urpm->new_parse_cmdline and use it

(it may be a little stricter for urpmi since we exit(1) on parse_cmdline error)

1 files changed, 7 insertions, 0 deletions

diff --git a/urpm.pm b/urpm.pm
index 9416e4eb..11a3aec9 100644
--- a/urpm.pm
+++ b/urpm.pm
@@ -61,6 +61,13 @@ sub new {
     $self;
 }
 
+sub new_parse_cmdline {
+    my ($class) = @_;
+    my $urpm = $class->new;
+    urpm::args::parse_cmdline(urpm => $urpm);
+    $urpm;
+}
+
 sub prefer_rooted {
     my ($root, $file) = @_;
     -e "$root$file" ? "$root$file" : $file;