diff options
author | Arun Isaac | 2019-09-02 22:46:55 +0530 |
---|---|---|
committer | Arun Isaac | 2019-09-02 22:46:55 +0530 |
commit | 95ca12914ed23c38cd9640f5ed51d7b767b20e10 (patch) | |
tree | 5970db27983e6c315afb8ebaa89d3dd749119d8d | |
parent | 731fbd4a17602913ca59bc9a9696fde050e70771 (diff) | |
download | ennum-95ca12914ed23c38cd9640f5ed51d7b767b20e10.tar.gz ennum-95ca12914ed23c38cd9640f5ed51d7b767b20e10.tar.lz ennum-95ca12914ed23c38cd9640f5ed51d7b767b20e10.zip |
Support percent encoded URIs in ennu server.
* ennu.el (ennu-publish): Decode percent encoded URIs.
-rw-r--r-- | ennu.el | 7 |
1 files changed, 4 insertions, 3 deletions
@@ -476,9 +476,10 @@ as keys. Keys are compared using `equal'." (setq httpd-root (expand-file-name (ennu-setting :output-directory) (ennu-setting :working-directory))) (defun httpd/ (proc uri-path query request) - (pcase (httpd-status (httpd-gen-path uri-path)) - (200 (httpd-serve-root proc httpd-root uri-path request)) - (_ (httpd-serve-root proc httpd-root (concat uri-path ".html") request)))) + (let ((uri-path (httpd-unhex uri-path))) + (pcase (httpd-status (httpd-gen-path uri-path)) + (200 (httpd-serve-root proc httpd-root uri-path request)) + (_ (httpd-serve-root proc httpd-root (concat uri-path ".html") request))))) (httpd-start)) (provide 'ennu) |