* src/lread.c (oblookup): Remove. All callers changed.

1 files changed, 1 insertions, 6 deletions

diff --git a/src/font.c b/src/font.c
index ddf28562c7..bb9629c7bd 100644
--- a/src/font.c
+++ b/src/font.c
@@ -277,13 +277,8 @@ font_intern_prop (const char *str, ptrdiff_t len, bool force_symbol)
   /* This code is similar to intern function from lread.c.  */
   obarray = check_obarray (Vobarray);
   parse_str_as_multibyte ((unsigned char *) str, len, &nchars, &nbytes);
-  tem = oblookup (obarray, str,
-		  (len == nchars || len != nbytes) ? len : nchars, len);
-
-  if (SYMBOLP (tem))
-    return tem;
   tem = make_specified_string (str, nchars, len,
-			       len != nchars && len == nbytes);
+                               len != nchars && len == nbytes);
   return Fintern (tem, obarray);
 }