Index: /branches/release-41/lib/MT/CMS/Template.pm
===================================================================
--- /branches/release-41/lib/MT/CMS/Template.pm (revision 2715)
+++ /branches/release-41/lib/MT/CMS/Template.pm (revision 2717)
@@ -1647,16 +1647,18 @@
         no warnings; # some sets may not define an order
         @$sets = sort { $a->{order} <=> $b->{order} } @$sets;
-        $param->{'template_set_loop'} = $sets;
 
         my $existing_set = $blog->template_set || 'mt_blog';
+        my @sets;
         foreach (@$sets) {
-            if ($_->{key} eq $existing_set) {
-                $_->{selected} = 1;
-            }
-        }
-        $param->{'template_set_index'} = $#$sets;
-        $param->{'template_set_count'} = scalar @$sets;
-
-        $param->{template_sets} = $sets;
+            my %set = %{$_};
+            if ($set{key} eq $existing_set) {
+                $set{selected} = 1;
+            }
+            push @sets, \%set;
+        }
+        $param->{'template_set_index'} = $#sets;
+        $param->{'template_set_count'} = scalar @sets;
+        $param->{'template_set_loop'} = \@sets;
+
         $param->{screen_id} = "refresh-templates-dialog";
     }