From 89faad8518486a12391a01558d30dacc9af6796e Mon Sep 17 00:00:00 2001 From: USAMI Kenta Date: Thu, 25 Aug 2022 00:08:47 +0900 Subject: [PATCH] Fix php-run-builtin-web-server to expand root path --- lisp/php.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/php.el b/lisp/php.el index 9ab8492c..1a49e42e 100644 --- a/lisp/php.el +++ b/lisp/php.el @@ -585,7 +585,8 @@ When `DOCUMENT-ROOT' is NIL, the document root is obtained from `ROUTER-OR-DIR'. (read-number "Port: " php-default-builtin-web-server-port) (if (file-directory-p d-o-r) nil - (let ((root-input (read-file-name "Document root: " (directory-file-name d-o-r)))) + (let ((root-input (expand-file-name + (read-file-name "Document root: " (directory-file-name d-o-r))))) (file-name-directory (if (file-directory-p root-input) root-input