From 2cf450feb990920919389510c5f9ba40ef087474 Mon Sep 17 00:00:00 2001 From: Mischa POSLAWSKY Date: Wed, 29 Mar 2017 17:12:21 +0200 Subject: [PATCH] common: mark dev pages as noindex to robots Prevent search engines from linking to unfinished site. --- common.inc.plp | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/common.inc.plp b/common.inc.plp index 593adb0..33fad39 100644 --- a/common.inc.plp +++ b/common.inc.plp @@ -102,6 +102,7 @@ sub Html { ref $_ eq 'ARRAY' and $_ = stylesheet(@$_)."\n" for $meta->{stylesheet}; # other vars + my $Dev = $ENV{HTTP_HOST} =~ /\bdev\./; my ($file) = $ENV{SCRIPT_FILENAME} =~ m{ ([^/]+) \.plp$ }x; # leading output @@ -120,10 +121,10 @@ sub Html { EOT say for $meta->{stylesheet} || (); say for $meta->{raw} || (); + say '' if $Dev; say qq{\n\n}; - # dev indicator - my $Dev = $ENV{HTTP_HOST} =~ /\bdev\./; + # development version indicator printf '

beta

', join('; ', 'position: fixed', 'right: 1em', -- 2.30.0