diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/server.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/server.el b/lisp/server.el index 2007635b98c..ce19b3c9d0f 100644 --- a/lisp/server.el +++ b/lisp/server.el | |||
| @@ -1167,6 +1167,9 @@ The following commands are accepted by the client: | |||
| 1167 | (let ((file (pop args-left))) | 1167 | (let ((file (pop args-left))) |
| 1168 | (if coding-system | 1168 | (if coding-system |
| 1169 | (setq file (decode-coding-string file coding-system))) | 1169 | (setq file (decode-coding-string file coding-system))) |
| 1170 | (when (and (eq system-type 'cygwin) | ||
| 1171 | (fboundp 'cygwin-convert-file-name-from-windows)) | ||
| 1172 | (setq file (cygwin-convert-file-name-from-windows file))) | ||
| 1170 | (setq file (expand-file-name file dir)) | 1173 | (setq file (expand-file-name file dir)) |
| 1171 | (push (cons file filepos) files) | 1174 | (push (cons file filepos) files) |
| 1172 | (server-log (format "New file: %s %s" | 1175 | (server-log (format "New file: %s %s" |