Index: /branches/release-40/lib/MT/Upgrade.pm
===================================================================
--- /branches/release-40/lib/MT/Upgrade.pm (revision 2548)
+++ /branches/release-40/lib/MT/Upgrade.pm (revision 2569)
@@ -932,4 +932,19 @@
                     $file_template =~ s/%-C/<MTCategoryLabel dirify="-">/g;
                     $map->file_template($file_template);
+                },
+            },
+        },
+        'core_assign_all_permisssions_blog_admin' => {
+            version_limit => 4.0063,
+            priority => 3.4,
+            updater => {
+                type => 'permission',
+                label => 'Assigning all permissions to blog administrator...',
+                condition => sub {
+                    $_[0]->can_administer_blog;
+                },
+                code => sub {
+                    my ($perm) = shift;
+                    $perm->set_full_permissions;
                 },
             },