changeset 28511:7a9707590ccd

(make_fontset_for_ascii_face): Use XINT on return value. (Fset_fontset_font): Use EQ to compare lisp objects.
author Ken Raeburn <raeburn@raeburn.org>
date Sat, 08 Apr 2000 19:33:36 +0000
parents 6fb7a3864791
children 01292435daaf
files src/fontset.c
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/fontset.c	Fri Apr 07 16:10:04 2000 +0000
+++ b/src/fontset.c	Sat Apr 08 19:33:36 2000 +0000
@@ -516,7 +516,7 @@
     base_fontset = Vdefault_fontset;
 
   fontset = make_fontset (frame, Qnil, base_fontset);
-  return FONTSET_ID (fontset);
+  return XINT (FONTSET_ID (fontset));
 }
 
 
@@ -1032,7 +1032,7 @@
 
   CHECK_STRING (fontname, 2);
   fontname = Fdowncase (fontname);
-  if (fontset == Vdefault_fontset)
+  if (EQ (fontset, Vdefault_fontset))
     {
       if (!check_registry_encoding (fontname))
 	error ("Invalid registry and encoding name: %s",