perl: deobfuscate the year of v5.8 stability end

[sheet.git] / common.inc.plp

diff --git a/common.inc.plp b/common.inc.plp
index 14ff204c5ffa669d5a43e9ec2a94fa6edf46f9a4..fec7b570a263cd7875aff05418fb0c71d25e2948 100644 (file)
--- a/common.inc.plp
+++ b/common.inc.plp
@@ -71,8 +71,8 @@ sub stylesheet {
                } or warn "Unable to create style cookie: $@";
        }
 
-       $style ||= $styles{$_} for $cookie{style} || ();
        my $setstyle = $style;
+       $style ||= $styles{$_} for $cookie{style} || ();
        $style ||= $avail[0];
        return $setstyle;
 }