diff --git a/collects/meta/web/www/irc.rkt b/collects/meta/web/www/irc.rkt index 5e10970200..42835d509e 100644 --- a/collects/meta/web/www/irc.rkt +++ b/collects/meta/web/www/irc.rkt @@ -11,9 +11,14 @@ @page[#:title "IRC" #:part-of 'community]{ @iframe[src: webchat-link width: "100%" height: "400"]}) -(define irc-logs-symlink - (symlink "/home/scheme/irc-logs/racket/" "irc-logs")) -(define (irc-logs text) @a[href: (list irc-logs-symlink "/")]{@text}) +(define irc-logs + (let () + @plain[#:file "irc-logs/.htaccess" #:referrer values]{ + RewriteEngine on + RewriteRule ^(.*)$ http://pre.racket-lang.org@; + /irc-logs/@||racket/@|"$1"| [P] + } + (lambda (text) @a[href: "irc-logs/"]{@text}))) (define (irc-quick) @parlist[@strong{Discussion Channel}