ryuslash/hypo
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Add *prefix* option

Browse source 
`*prefix*' specifies which directory the application should run
under. This is useful when not running it on a domain or
sub-domain. This should contain a trailing `/' if used.
This commit is contained in:
Tom Willemse 2013-08-07 23:19:38 +02:00
parent ebd4666b17
commit c5699ecfa7
2 changed files with 10 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
config.example.hy
View file

@ -17,3 +17,8 @@
(def *dbuser* "") ; User to log in with (def *dbuser* "") ; User to log in with
(def *dbpw* "") ; Password to log in with (def *dbpw* "") ; Password to log in with
(def *dbname* "") ; Database to use (def *dbname* "") ; Database to use
;; Prefix to use when running. This option should contain a trailing
;; `/'. An example would be: if you're running this project under
;; http://example.com/hypo/ you should use "hypo/".
(def *prefix* "")

10
hypo.hy
View file

@ -27,10 +27,10 @@
(sys.exit 1))) (sys.exit 1)))
(def render (web.template.render "templates/")) (def render (web.template.render "templates/"))
(def urls (, "/raw/(.*)" "raw" (def urls (, (+ "/" *prefix* "raw/(.*)") "raw"
"/dl/(.*)" "download" (+ "/" *prefix* "dl/(.*)") "download"
"/([a-f0-9]{7})$" "html" (+ "/" *prefix* "([a-f0-9]{7})$") "html"
"/(.*)" "upload")) (+ "/" *prefix* "(.*)") "upload"))
(def db (def db
(kwapply (web.database) (kwapply (web.database)
{"dbn" "postgres" "user" *dbuser* "pw" *dbpw* "db" *dbname*})) {"dbn" "postgres" "user" *dbuser* "pw" *dbpw* "db" *dbname*}))
@ -127,7 +127,7 @@
"filename" name "filename" name
"type" (get-type (get (os.path.splitext name) 1))}) "type" (get-type (get (os.path.splitext name) 1))})
(setv web.ctx.status "201 Created") (setv web.ctx.status "201 Created")
(+ web.ctx.home "/" (get h 0) "\n")))]]) (+ web.ctx.home "/" *prefix* (get h 0) "\n")))]])
(when (= __name__ "__main__") (when (= __name__ "__main__")
(let ((sys.argv (slice sys.argv 1)) (let ((sys.argv (slice sys.argv 1))