Simple wrapper for make_unibyte_string, adjust font_open_by_name.

* src/lisp.h (build_unibyte_string): New function.
* src/dosfns.c, src/fileio.c, src/fns.c, src/ftfont.c, src/process.c:
* src/sysdep.c, src/w32fns.c, src/xfns.c: Use it.
* src/font.c (font_open_by_name): Change 2nd and 3rd args to the only arg
of type Lisp_Object to avoid redundant calls to make_unibyte_string.
Adjust users accordingly.
* src/font.h (font_open_by_name): Adjust prototype.
* admin/coccinelle/unibyte_string.cocci: Semantic patch to convert from
make_unibyte_string to build_unibyte_string where appropriate.

1 files changed, 2 insertions, 3 deletions

diff --git a/src/fileio.c b/src/fileio.c
index 185dd650438..a13fe94e416 100644
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -159,8 +159,7 @@ report_file_error (const char *string, Lisp_Object data)
 
   synchronize_system_messages_locale ();
   str = strerror (errorno);
-  errstring = code_convert_string_norecord (make_unibyte_string (str,
-                                                                 strlen (str)),
+  errstring = code_convert_string_norecord (build_unibyte_string (str),
                                             Vlocale_coding_system, 0);
 
   while (1)
@@ -1658,7 +1657,7 @@ those `/' is discarded.  */)
                env variables twice should be acceptable. Note that
                decoding may cause a garbage collect.  */
             Lisp_Object orig, decoded;
-            orig = make_unibyte_string (o, strlen (o));
+            orig = build_unibyte_string (o);
             decoded = DECODE_FILE (orig);
             total += SBYTES (decoded);
             substituted = 1;