sort dashboard widgets through priority

lib/NGCP/Panel/Widget.pm

@@ -26,7 +26,7 @@ sub instantiate_plugins {
             push @instances, $inst;
         }
     }
-    return @instances;
+    return sort {$a->priority > $b->priority} @instances;
 }
 
 no Moose;

lib/NGCP/Panel/Widget/Plugin/AdminBillingOverview.pm

@@ -13,6 +13,12 @@ has 'type' => (
     default => 'dashboard_widgets',
 );
 
+has 'priority' => (
+    is  => 'ro',
+    isa => 'Int',
+    default => 11,
+);
+
 around handle => sub {
     my ($foo, $self, $c) = @_;
 

lib/NGCP/Panel/Widget/Plugin/AdminPeeringOverview.pm

@@ -13,6 +13,12 @@ has 'type' => (
     default => 'dashboard_widgets',
 );
 
+has 'priority' => (
+    is  => 'ro',
+    isa => 'Int',
+    default => 12,
+);
+
 around handle => sub {
     my ($foo, $self, $c) = @_;
 

lib/NGCP/Panel/Widget/Plugin/AdminResellerOverview.pm

@@ -13,6 +13,12 @@ has 'type' => (
     default => 'dashboard_widgets',
 );
 
+has 'priority' => (
+    is  => 'ro',
+    isa => 'Int',
+    default => 10,
+);
+
 around handle => sub {
     my ($foo, $self, $c) = @_;
 

lib/NGCP/Panel/Widget/Plugin/AdminSystemOverview.pm

@@ -13,6 +13,12 @@ has 'type' => (
     default => 'dashboard_widgets',
 );
 
+has 'priority' => (
+    is  => 'ro',
+    isa => 'Int',
+    default => 1,
+);
+
 around handle => sub {
     my ($foo, $self, $c) = @_;
 

lib/NGCP/Panel/Widget/Plugin/ResellerDomainOverview.pm

@@ -13,6 +13,12 @@ has 'type' => (
     default => 'dashboard_widgets',
 );
 
+has 'priority' => (
+    is  => 'ro',
+    isa => 'Int',
+    default => 100,
+);
+
 around handle => sub {
     my ($foo, $self, $c) = @_;