From 528d9af4f664f0e2524b7395925b7ac4a328c906 Mon Sep 17 00:00:00 2001
From: JT Smith <jt@plainblack.com>
Date: Fri, 26 Jan 2007 03:17:42 +0000
Subject: [PATCH] fix: No closure

---
 docs/changelog/7.x.x.txt   | 2 ++
 lib/WebGUI/AssetLineage.pm | 5 ++---
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/docs/changelog/7.x.x.txt b/docs/changelog/7.x.x.txt
index 128da0054..67bc138ef 100644
--- a/docs/changelog/7.x.x.txt
+++ b/docs/changelog/7.x.x.txt
@@ -1,12 +1,14 @@
 7.3.8
  - Fixed a template variable rewriting problem with HTML::Template::Expr
  - Added a attachment_thumbnail option to the CS RSS feed.
+ - fix: No closure
  - No Reports In/Out Board (perlDreamer Consulting, LLC)
  - fix: The 7.2.3-7.3.0 upgrade will no longer orphan EventsCalendars
    and Events on the clipboard.
  - fix: The upgrade script will remove any orphaned EventsCalendars and 
    Events.
 
+
 7.3.7
  - Fixed a template variable rewriting problem with Template Toolkit.
  - Fixed a bug with dealing with CS posts via email where
diff --git a/lib/WebGUI/AssetLineage.pm b/lib/WebGUI/AssetLineage.pm
index 4a3f73648..6d53d725a 100644
--- a/lib/WebGUI/AssetLineage.pm
+++ b/lib/WebGUI/AssetLineage.pm
@@ -398,9 +398,8 @@ sub getLineage {
 	
     my $statusCodes = $rules->{statusToInclude} || [];
     if($rules->{includeArchived}) {
-       if(!WebGUI::Utility::isIn($rules->{includeArchived},@{$statusCodes})) {
-          push(@{$statusCodes},'archived');
-       }
+	        push(@{$statusCodes},'archived') if(!WebGUI::Utility::isIn('archived',@{$statusCodes}));
+          	push(@{$statusCodes},'approved') if(!WebGUI::Utility::isIn('approved',@{$statusCodes}));
     }
     
     my $status = "assetData.status='approved'";