implement "yesterday" in URLs

2 files changed, 6 insertions, 0 deletions

diff --git a/cgi/.htaccess b/cgi/.htaccess
index 089baac..56e94fd 100644
--- a/cgi/.htaccess
+++ b/cgi/.htaccess
@@ -16,6 +16,9 @@ RewriteRule ^([\w_-]+)/?$ /channel-index.pl?channel=$1 [L]
 RewriteCond %{HTTP_REQUEST} !^search
 RewriteRule ^([^/]+)/today$ out.pl?channel=$1
 
+RewriteCond %{HTTP_REQUEST} !^search
+RewriteRule ^([^/]+)/yesterday$ out.pl?channel=$1;date=yesterday
+
 RewriteCond %{QUERY_STRING} ^channel=([^;]+);date=(\d\d\d\d-\d\d-\d\d)
 RewriteCond %{HTTP_REQUEST} ^out\.pl
 RewriteRule ^out.pl /%1/%2? [R=301,L]
diff --git a/cgi/out.pl b/cgi/out.pl
index 2c9a732..ba79a82 100755
--- a/cgi/out.pl
+++ b/cgi/out.pl
@@ -60,7 +60,10 @@ my $channel = $q->param('channel') || $default_channel;
 my $date = $q->param('date') || gmt_today();
 if ($date eq 'today') {
     $date = gmt_today();
+} elsif ($date eq 'yesterday') {
+    $date = date(gmt_today()) - 1;
 }
+
 if ($date eq gmt_today()) {
     print http_header({ nocache => 1});
 } else {