Add the same kind of performance data for Shortcuts, as AssetProxy macros.

perlDreamer · perlDreamer · commit 2d83f3c0d156 · 2012-09-11T16:42:43.000-07:00
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();
