X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=rt%2Fhtml%2FElements%2FEditLinks;h=32c75a5a41b5787e8ae0f0f8e78176f72619c610;hp=68c08dd1626f953b25717f9ac4ba6444f4be4247;hb=ef20b2b6b1feb47ad02b5ff7525f1a0fd11d0fa4;hpb=a513c0bef534d05f03c1242831b6f3be19b97dae diff --git a/rt/html/Elements/EditLinks b/rt/html/Elements/EditLinks index 68c08dd16..32c75a5a4 100755 --- a/rt/html/Elements/EditLinks +++ b/rt/html/Elements/EditLinks @@ -2,7 +2,7 @@ %# %# COPYRIGHT: %# -%# This software is Copyright (c) 1996-2005 Best Practical Solutions, LLC +%# This software is Copyright (c) 1996-2007 Best Practical Solutions, LLC %# %# %# (Except where explicitly superseded by other copyright notices) @@ -22,7 +22,9 @@ %# %# You should have received a copy of the GNU General Public License %# along with this program; if not, write to the Free Software -%# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +%# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA +%# 02110-1301 or visit their web page on the internet at +%# http://www.gnu.org/copyleft/gpl.html. %# %# %# CONTRIBUTION SUBMISSION POLICY: @@ -43,9 +45,9 @@ %# those contributions and any derivatives thereof. %# %# END BPS TAGGED BLOCK }}} - - - + + + + + + + + + + + + + + + + + + + + + + + +
+ + + - + - -

<&|/l&>Current Links

@@ -57,8 +59,8 @@ @@ -67,8 +69,8 @@ @@ -76,8 +78,8 @@ @@ -85,8 +87,8 @@ @@ -94,8 +96,8 @@ @@ -103,61 +105,63 @@
<&|/l&>Depends on: % while (my $link = $Object->DependsOn->Next) { - - <& ShowLink, URI => $link->TargetURI &>
+ + <& ShowLink, URI => $link->TargetURI &>
% }
% while (my $link = $Object->DependedOnBy->Next) { % my $member = $link->BaseObj; - - <& ShowLink, URI => $link->BaseURI &>
+ + <& ShowLink, URI => $link->BaseURI &>
% }
<&|/l&>Parents: % while (my $link = $Object->MemberOf->Next) { - - <& ShowLink, URI => $link->TargetURI &>
+ + <& ShowLink, URI => $link->TargetURI &>
% }
<&|/l&>Children: % while (my $link = $Object->Members->Next) { - - <& ShowLink, URI => $link->BaseURI &>
+ + <& ShowLink, URI => $link->BaseURI &>
% }
<&|/l&>Refers to: % while (my $link = $Object->RefersTo->Next) { - - <& ShowLink, URI => $link->TargetURI &>
+ + <& ShowLink, URI => $link->TargetURI &>
%}
<&|/l&>Referred to by: % while (my $link = $Object->ReferredToBy->Next) { - - <& ShowLink, URI => $link->BaseURI &>
+% # Skip reminders +% next if (UNIVERSAL::isa($link->BaseObj, 'RT::Ticket') && $link->BaseObj->Type eq 'reminder'); + + <& ShowLink, URI => $link->BaseURI &>
% }
-
+

<&|/l&>New Links

% if (ref($Object) eq 'RT::Ticket') { <&|/l&>Enter tickets or URIs to link tickets to. Separate multiple entries with spaces. <& /Elements/Callback, _CallbackName => 'ExtraLinkInstructions' &> -
+
% } elsif (ref($Object) eq 'RT::Queue') { <&|/l&>Enter queues or URIs to link queues to. Separate multiple entries with spaces. -
+
% } else { -<&|/l&>Enter objects or URIs to link objects to. Separate multiple entries with spaces.
+<&|/l&>Enter objects or URIs to link objects to. Separate multiple entries with spaces.
% } - +
% if ($Merge) { - - - - + + + + % } - - - - - - - - - - - - - - - - - - - - - - - - -
<&|/l&>Merge into: <&|/l&>(only one ticket)
<&|/l&>Merge into: <&|/l&>(only one ticket)
<&|/l&>Depends on:
<&|/l&>Depended on by:
<&|/l&>Parents:
<&|/l&>Children:
<&|/l&>Refers to:
<&|/l&>Referred to by:
-
+
<&|/l&>Depends on:
<&|/l&>Depended on by:
<&|/l&>Parents:
<&|/l&>Children:
<&|/l&>Refers to:
<&|/l&>Referred to by:
+ + + <%INIT> my $id;