X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=rt%2Fetc%2Fupgrade%2F3.9.5%2Fbackcompat;h=ca0b289c9078f669b8b64685f3f3aa984480507c;hb=e131b1f71f08b69abb832c1687d1f29682d171f8;hp=611ab51861cc9d99cea4fbaab0654b308e9765b4;hpb=d05d7346bb2387fd9d0354923d577275c5c7f019;p=freeside.git

diff --git a/rt/etc/upgrade/3.9.5/backcompat b/rt/etc/upgrade/3.9.5/backcompat
index 611ab5186..ca0b289c9 100644
--- a/rt/etc/upgrade/3.9.5/backcompat
+++ b/rt/etc/upgrade/3.9.5/backcompat
@@ -1 +1,15 @@
-RT::ACE		LastUpdated LastUpdatedBy Creator Created
+my ($upgrade) = @_;
+
+my %removed;
+my @fields = qw/LastUpdated LastUpdatedBy Creator Created/;
+
+RT::ACE->_BuildTableAttributes;
+$RT::Logger->debug("Temporarily removing @fields from RT::ACE");
+$removed{$_} = delete $RT::Record::_TABLE_ATTR->{"RT::ACE"}{$_}
+    for @fields;
+
+$upgrade->();
+
+# Put back the fields we chopped off
+$RT::Record::_TABLE_ATTR->{"RT::ACE"}{$_} = $removed{$_}
+    for @fields;