diff options
| author | Po Lu <luangruo@yahoo.com> | 2022-05-09 08:22:03 +0000 |
|---|---|---|
| committer | Po Lu <luangruo@yahoo.com> | 2022-05-09 08:22:03 +0000 |
| commit | 52a27a67c1f501898bdb13841ce07609bbe4772e (patch) | |
| tree | db278cef7a1b177f12338fdead9b9a719af0e511 | |
| parent | 09866bb019d005ac5a8c475fe0b173fa35228d11 (diff) | |
| download | emacs-52a27a67c1f501898bdb13841ce07609bbe4772e.tar.gz | |
Fix file-based launching on Haiku
* src/haikuselect.c (Fhaiku_roster_launch): Canonicalize file
names before using them.
| -rw-r--r-- | src/haikuselect.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/haikuselect.c b/src/haikuselect.c index 6d62f395c16..8ce71822983 100644 --- a/src/haikuselect.c +++ b/src/haikuselect.c @@ -821,7 +821,7 @@ after it starts. */) team_id team_id; status_t rc; ptrdiff_t i, nargs; - Lisp_Object tem; + Lisp_Object tem, canonical; void *message; specpdl_ref depth; @@ -840,9 +840,10 @@ after it starts. */) { CHECK_LIST (file_or_type); tem = XCAR (file_or_type); + canonical = Fexpand_file_name (tem, Qnil); CHECK_STRING (tem); - SAFE_ALLOCA_STRING (file, ENCODE_FILE (tem)); + SAFE_ALLOCA_STRING (file, ENCODE_FILE (canonical)); CHECK_LIST_END (XCDR (file_or_type), file_or_type); } |