Add the same kind of performance data for Shortcuts, as AssetProxy ma…

…cros.
plainblack · Sep 11, 2012 · 2d83f3c · 2d83f3c
1 parent b37f9d5
commit 2d83f3c
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/lib/WebGUI/Asset/Shortcut.pm b/lib/WebGUI/Asset/Shortcut.pm
@@ -942,7 +942,10 @@ sub view {
         # Make sure the www_view method won't be skipped b/c the asset is cached.
         $shortcut->purgeCache();
 
-		$content = $shortcut->view;
+        my $t = ($self->session->log->canShowPerformanceIndicators()) ? [Time::HiRes::gettimeofday()] : undef;
+        $content = $shortcut->view;
+        $content .= "Shortcut:" . Time::HiRes::tv_interval($t)
+            if $t;
 
         # Make sure the overrides are not cached by the original asset.
         $shortcut->purgeCache();