[livejournal] r20165: LJM-1977: Doesn't display css for self p...

U   trunk/cgi-bin/LJ/HTML/Template.pm

Modified: trunk/cgi-bin/LJ/HTML/Template.pm
===================================================================
--- trunk/cgi-bin/LJ/HTML/Template.pm	2011-09-29 04:33:30 UTC (rev 20164)
+++ trunk/cgi-bin/LJ/HTML/Template.pm	2011-09-29 05:03:37 UTC (rev 20165)
@@ -87,6 +87,13 @@
             },
         );
 
+        HTML::Template::Pro->register_function(
+            'src2url' => sub {
+                my $src = shift;
+                return LJ::stat_src_to_url($src);
+            },
+        );
+
         my $template = HTML::Template::Pro->new(
             global_vars => 1, # normally variables declared outside a loop are not available inside
                               # a loop.  This option makes <TMPL_VAR>s like global variables in Perl