Merge branch 'ptcms' of github.com:teodesian/tCMS into ptcms

Makefile

@@ -1,6 +1,7 @@
 .PHONY: install
 install:
-	test -d $(HOME) || mkdir $(HOME)/.tcms
+	test -d $(HOME)/.tcms || mkdir $(HOME)/.tcms
+	test -d www/themes || mkdir www/themes
 	rm pod2htmd.tmp; /bin/true
 
 .PHONY: test

www/server.psgi

@@ -129,7 +129,7 @@ my $app = sub {
 
     $query->{user}   = $active_user;
     $query->{domain} = $env->{HTTP_HOST};
-    $query->{route}  = $path;
+    $query->{route}  = $env->{REQUEST_URI};
     $query->{scheme} = $env->{'psgi.url_scheme'} // 'http';
 
     my $output =  $routes{$path}{callback}->($query, \&_render);