1 files changed, 29 insertions, 22 deletions
diff --git a/extensions/TrackingFlags/lib/Constants.pm b/extensions/TrackingFlags/lib/Constants.pm
index 57b2873e3..b6813c3c2 100644
--- a/extensions/TrackingFlags/lib/Constants.pm
+++ b/extensions/TrackingFlags/lib/Constants.pm
@@ -14,27 +14,34 @@ our @EXPORT = qw(
     FLAG_TYPES
 );
 
-use constant FLAG_TYPES => [
-    {
-        name        => 'tracking',
-        description => 'Tracking Flags',
-        collapsed   => 1,
-    },
-    {
-        name        => 'project',
-        description => 'Project Flags',
-        collapsed   => 0,
-    },
-    {
-        name        => 'blocking',
-        description => 'Blocking Flags',
-        collapsed   => 1,
-    },
-    {
-        name        => 'b2g',
-        description => 'B2G Flags',
-        collapsed   => 1,
-    }
-];
+sub FLAG_TYPES {
+    my @flag_types = (
+        {
+            name        => 'project',
+            description => 'Project Flags',
+            collapsed   => 0,
+            sortkey     => 0
+        },
+        {
+            name        => 'tracking',
+            description => 'Tracking Flags',
+            collapsed   => 1,
+            sortkey     => 1
+        },
+        {
+            name        => 'blocking',
+            description => 'Blocking Flags',
+            collapsed   => 1,
+            sortkey     => 2
+        },
+        {
+            name        => 'b2g',
+            description => 'B2G Flags',
+            collapsed   => 1,
+            sortkey     => 3
+        },
+    );
+    return [ sort { $a->{'sortkey'} <=> $b->{'sortkey'} } @flag_types ];
+}
 
 1;