From: Po Lu <luangruo@yahoo.com>
Date: Wed, 4 May 2022 03:26:28 +0000 (+0000)
Subject: Encode and decode filenames correctly on Haiku
X-Git-Tag: emacs-29.0.90~1931^2~82
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=10284ca3d3a01505c3f19668f7e00586cac414b5;p=emacs.git

Encode and decode filenames correctly on Haiku

* src/haikufns.c (Fhaiku_read_file_name): Decode file names
correctly.
---

diff --git a/src/haikufns.c b/src/haikufns.c
index 3e3104193e0..bee41e4ec0a 100644
--- a/src/haikufns.c
+++ b/src/haikufns.c
@@ -2482,7 +2482,10 @@ Optional arg SAVE_TEXT, if non-nil, specifies some text to show in the entry fie
     error ("Trying to use a menu from within a menu-entry");
 
   if (!NILP (dir))
-    CHECK_STRING (dir);
+    {
+      CHECK_STRING (dir);
+      dir = DECODE_FILE (dir);
+    }
 
   if (!NILP (save_text))
     CHECK_STRING (save_text);
@@ -2513,7 +2516,7 @@ Optional arg SAVE_TEXT, if non-nil, specifies some text to show in the entry fie
   value = build_string (file_name);
   free (file_name);
 
-  return value;
+  return ENCODE_FILE (value);
 }
 
 DEFUN ("haiku-put-resource", Fhaiku_put_resource, Shaiku_put_resource,