From ec567a7e2452ebda72791426cf71a4b7c7e72a93 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Fri, 24 Apr 2009 02:02:42 +0000
Subject: [PATCH] Set the scratch variable for the main asset as well.

---
 lib/WebGUI/AssetExportHtml.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lib/WebGUI/AssetExportHtml.pm b/lib/WebGUI/AssetExportHtml.pm
index 6722db17f..c1aa45051 100644
--- a/lib/WebGUI/AssetExportHtml.pm
+++ b/lib/WebGUI/AssetExportHtml.pm
@@ -188,6 +188,8 @@ false will do nothing.
 sub exportAsHtml {
     my $self                = shift;
     my $session             = $self->session;
+    # set a scratch variable for Assets to know we're exporting
+    $session->scratch->set('isExporting', 1);
     my ($returnCode, $message);
 
     # get the i18n object