[Rt-commit] r13975 - in rt/3.8/trunk/etc/upgrade: 3.8.0

ruz at bestpractical.com ruz at bestpractical.com
Thu Jul 10 17:52:33 EDT 2008


Author: ruz
Date: Thu Jul 10 17:52:30 2008
New Revision: 13975

Added:
   rt/3.8/trunk/etc/upgrade/3.8.0/
   rt/3.8/trunk/etc/upgrade/3.8.0/content
Modified:
   rt/3.8/trunk/etc/upgrade/3.7.82/content

Log:
* fix mess with 'My Bookmarks' and 'Bookmarked Tickets'

Modified: rt/3.8/trunk/etc/upgrade/3.7.82/content
==============================================================================
--- rt/3.8/trunk/etc/upgrade/3.7.82/content	(original)
+++ rt/3.8/trunk/etc/upgrade/3.7.82/content	Thu Jul 10 17:52:30 2008
@@ -1,6 +1,6 @@
 @Attributes = (
-    { Name => 'Search - My Bookmarks',
-      Description => 'My Bookmarks', #loc
+    { Name => 'Search - Bookmarked Tickets',
+      Description => 'Bookmarked Tickets', #loc
       Content     =>
       { Format => q{'<a href="__WebPath__/Ticket/Display.html?id=__id__">__id__</a>/TITLE:#',}
                 . q{'<a href="__WebPath__/Ticket/Display.html?id=__id__">__Subject__</a>/TITLE:Subject',}

Added: rt/3.8/trunk/etc/upgrade/3.8.0/content
==============================================================================
--- (empty file)
+++ rt/3.8/trunk/etc/upgrade/3.8.0/content	Thu Jul 10 17:52:30 2008
@@ -0,0 +1,22 @@
+ at Final = (
+    # by incident we've changed 'My Bookmarks' to 'Bookmarked Tickets' when
+    # 3.7.82 upgrade script still was creating 'My Bookmarks', try to fix it
+    sub {
+        $RT::Logger->debug("Going to rename 'My Bookmarks' to 'Bookmarked Tickets'");
+        my $sys = RT::System->new($RT::SystemUser);
+
+        my $attrs = RT::Attributes->new( $RT::SystemUser );
+        $attrs->LimitToObject( $sys );
+        my ($attr) = $attrs->Named( 'Search - My Bookmarks' );
+        unless ($attr) {
+            $RT::Logger->debug("You have no global search 'My Bookmarks'. Skipped.");
+            return 1;
+        }
+        my ($status, $msg) = $attr->SetName( 'Search - Bookmarked Tickets' );
+        $RT::Logger->error($msg) and return undef unless $status;
+
+        $RT::Logger->debug("Renamed.");
+        return 1;
+    },
+);
+


More information about the Rt-commit mailing list