[Rt-commit] rt branch, 4.0/remove-dead-code, created. rt-4.0.4-239-ge871d3b

[Alex Vandiver]

The branch, 4.0/remove-dead-code has been created
        at  e871d3b14e3859980369fd4fde7e51ec52b131be (commit)

- Log -----------------------------------------------------------------
commit e871d3b14e3859980369fd4fde7e51ec52b131be
Author: Alex Vandiver <alexmv at bestpractical.com>
Date:   Wed Jan 25 16:52:23 2012 -0500

    Remove dead code

diff --git a/share/html/Ticket/Create.html b/share/html/Ticket/Create.html
index 8d31efa..a7d5dc4 100755
--- a/share/html/Ticket/Create.html
+++ b/share/html/Ticket/Create.html
@@ -309,31 +309,6 @@ if ($CloneTicket) {
         push @refers_by, $refer_by->LocalBase;
     }
     $clone->{'RefersTo-new'} = join ' ', @refers_by;
-    if (0) {    # Temporarily disabled
-        my $depends = $CloneTicketObj->DependsOn;
-        while ( my $depend = $depends->Next ) {
-            push @depends, $depend->LocalTarget;
-        }
-        $clone->{'new-DependsOn'} = join ' ', @depends;
-
-        my $depends_by = $CloneTicketObj->DependedOnBy;
-        while ( my $depend_by = $depends_by->Next ) {
-            push @depends_by, $depend_by->LocalBase;
-        }
-        $clone->{'DependsOn-new'} = join ' ', @depends_by;
-
-        while ( my $member = $members->Next ) {
-            push @members, $member->LocalBase;
-        }
-        $clone->{'MemberOf-new'} = join ' ', @members;
-
-        my $members_of = $CloneTicketObj->MemberOf;
-        while ( my $member_of = $members_of->Next ) {
-            push @members_of, $member_of->LocalTarget;
-        }
-        $clone->{'new-MemberOf'} = join ' ', @members_of;
-
-    }
 
     my $cfs = $CloneTicketObj->QueueObj->TicketCustomFields();
     while ( my $cf = $cfs->Next ) {
diff --git a/share/html/m/ticket/create b/share/html/m/ticket/create
index 44547d1..08e4213 100644
--- a/share/html/m/ticket/create
+++ b/share/html/m/ticket/create
@@ -102,31 +102,6 @@ if ($CloneTicket) {
         push @refers_by, $refer_by->LocalBase;
     }
     $clone->{'RefersTo-new'} = join ' ', @refers_by;
-    if (0) {    # Temporarily disabled
-        my $depends = $CloneTicketObj->DependsOn;
-        while ( my $depend = $depends->Next ) {
-            push @depends, $depend->LocalTarget;
-        }
-        $clone->{'new-DependsOn'} = join ' ', @depends;
-
-        my $depends_by = $CloneTicketObj->DependedOnBy;
-        while ( my $depend_by = $depends_by->Next ) {
-            push @depends_by, $depend_by->LocalBase;
-        }
-        $clone->{'DependsOn-new'} = join ' ', @depends_by;
-
-        while ( my $member = $members->Next ) {
-            push @members, $member->LocalBase;
-        }
-        $clone->{'MemberOf-new'} = join ' ', @members;
-
-        my $members_of = $CloneTicketObj->MemberOf;
-        while ( my $member_of = $members_of->Next ) {
-            push @members_of, $member_of->LocalTarget;
-        }
-        $clone->{'new-MemberOf'} = join ' ', @members_of;
-
-    }
 
     my $cfs = $CloneTicketObj->QueueObj->TicketCustomFields();
     while ( my $cf = $cfs->Next ) {

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