(report_file_error): Don't downcase the first character

of errstring if it is still unibyte.

diff --git a/src/fileio.c b/src/fileio.c
index 8eb1b3a2c8711ef95195ccb2790e767a85df9925..6b9b9afb47cbec1dc6714d1717369f43d26e94ae 100644 (file)
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -261,7 +261,8 @@ report_file_error (string, data)
       default:
        /* System error messages are capitalized.  Downcase the initial
           unless it is followed by a slash.  */
-       if (! EQ (Faref (errstring, make_number (1)), make_number ('/')))
+       if (STRING_MULTIBYTE (errstring)
+           && ! EQ (Faref (errstring, make_number (1)), make_number ('/')))
          {
            int c;