pull adsl by default if nothing specified

diff --git a/lib/APKPM/Davolink.pm b/lib/APKPM/Davolink.pm
index b988acb..1ac2f1a 100644 (file)
--- a/lib/APKPM/Davolink.pm
+++ b/lib/APKPM/Davolink.pm
@@ -22,6 +22,8 @@ sub info : Job : Decode(d_array) : Encode(e_json) {
        my $cpeip = shift @$workload;
        my $username = shift @$workload;
 
+       unshift @$workload, 'adsl'; # add default
+
        return { error => "invalid workload", expected => 'cpe.ip username (uptime|adsl|wan|routes)', workload => $workload } unless $cpeip && $username;
 
        my $cpeconnect=H1::Davolink->new($cpeip,$self->config('iadusername'),$self->config('iadpasswd'));