aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--.htaccess2
-rw-r--r--cgi-bin/nea.cgi.in5
-rw-r--r--index.scml5
3 files changed, 8 insertions, 4 deletions
diff --git a/.htaccess b/.htaccess
index e20fd52..a424156 100644
--- a/.htaccess
+++ b/.htaccess
@@ -1,7 +1,7 @@
RewriteEngine on
# --BEGIN MAINTENANCE RULES---
-RewriteCond .maintenance -f
+RewriteCond /home/gray/public_html/ellinika/.maintenance -f
RewriteCond %{REQUEST_FILENAME} !.*/maint.html
RewriteCond %{REQUEST_FILENAME} !.*\.css
RewriteCond %{REQUEST_FILENAME} !.*\.png
diff --git a/cgi-bin/nea.cgi.in b/cgi-bin/nea.cgi.in
index ef84ac5..b8eeae4 100644
--- a/cgi-bin/nea.cgi.in
+++ b/cgi-bin/nea.cgi.in
@@ -47,7 +47,10 @@
(car l)))
(else
s)))
- (string-split (or (getenv "HTTP_ACCEPT_LANGUAGE") "") #\,)))
+ (string-split (or
+ (getenv "HTTP_ACCEPT_LANGUAGE")
+ "")
+ #\,)))
(define nea-max-rows 20) ;; FIXME: Move to the config
diff --git a/index.scml b/index.scml
index 8d8e51d..3088c0b 100644
--- a/index.scml
+++ b/index.scml
@@ -50,8 +50,9 @@
(car l)))
(else
s)))
- (string-split
- (table:get (request-rec:subprocess-env Request) "HTTP_ACCEPT_LANGUAGE")
+ (string-split
+ (or (table:get (request-rec:subprocess-env Request) "HTTP_ACCEPT_LANGUAGE")
+ "")
#\,)))
(string-append ellinika-document-root "/" ellinika-dispatcher))))

Return to:

Send suggestions and report system problems to the System administrator.