[Rt-commit] rt branch, 4.0/subclassing-links-method, created. rt-4.0.0rc7-9-g9b14c7d

[Thomas Sibley]

The branch, 4.0/subclassing-links-method has been created
        at  9b14c7d3e559d7078f7ba4ee99fcfbc9e0c6cf87 (commit)

- Log -----------------------------------------------------------------
commit 9b14c7d3e559d7078f7ba4ee99fcfbc9e0c6cf87
Author: Thomas Sibley <trs at bestpractical.com>
Date:   Thu Mar 31 16:01:35 2011 -0400

    Ensure that ->Links uses the subclasses' ->_Links
    
    This fixes the case where $Ticket->Links called RT::Record::_Links
    instead of $Ticket->_Links, which special cases local ticket links and
    checks ACLs early.

diff --git a/lib/RT/Record.pm b/lib/RT/Record.pm
index 52f9ab6..72ff6f4 100644
--- a/lib/RT/Record.pm
+++ b/lib/RT/Record.pm
@@ -1192,7 +1192,7 @@ links of any type.
 
 =cut
 
-*Links = \&_Links;
+sub Links { shift->_Links(@_) }
 
 sub _Links {
     my $self = shift;

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