[livejournal] r23400: LJSUP-13388: LJ Shop - Styles

U   trunk/cgi-bin/LJ/S2Theme.pm

Modified: trunk/cgi-bin/LJ/S2Theme.pm
===================================================================
--- trunk/cgi-bin/LJ/S2Theme.pm	2012-11-29 14:41:22 UTC (rev 23399)
+++ trunk/cgi-bin/LJ/S2Theme.pm	2012-11-30 09:19:07 UTC (rev 23400)
@@ -189,7 +189,7 @@
         my @theme_cats = $theme->cats;
         if ($theme->is_buyable) {
             my $shop_theme = LJ::Pay::Theme->load_by_s2lid ($theme->s2lid);
-            @theme_cats = @{$shop_theme->get_cats};
+            @theme_cats = $shop_theme ? @{$shop_theme->get_cats} : @theme_cats;
         }
         foreach my $possible_cat (@theme_cats) {
             next unless $possible_cat eq $cat;