[Rt-commit] rt branch, 4.4/5.26-compat, created. rt-4.4.2-1-ga3e8c0b

[Shawn Moore]

The branch, 4.4/5.26-compat has been created
        at  a3e8c0b9b20834084ec92aa8546bbf04aa8afbbf (commit)

- Log -----------------------------------------------------------------
commit a3e8c0b9b20834084ec92aa8546bbf04aa8afbbf
Author: Shawn M Moore <shawn at bestpractical.com>
Date:   Tue Sep 19 16:15:11 2017 +0000

    Escape literal {} in custom role regex
    
    This improves compatibility with modern Perl versions which throw a
    deprecation warning

diff --git a/share/html/Search/Elements/EditSort b/share/html/Search/Elements/EditSort
index 4ab0800..4853e17 100644
--- a/share/html/Search/Elements/EditSort
+++ b/share/html/Search/Elements/EditSort
@@ -119,7 +119,7 @@ $fields{$_} = $_ for @cfs;
 # Add all available CustomRoles to the list of sortable columns.
 my @roles = grep /^CustomRole/, @{$ARGS{AvailableColumns}};
 for my $role (@roles) {
-    my ($label) = $role =~ /^CustomRole.{(.*)}$/;
+    my ($label) = $role =~ /^CustomRole.\{(.*)\}$/;
     my $value = $role;
     $fields{$label . '.EmailAddress' } = $value . '.EmailAddress';
 }

-----------------------------------------------------------------------