diff options
| author | Ken Raeburn <raeburn@raeburn.org> | 2000-04-08 19:33:36 +0000 |
|---|---|---|
| committer | Ken Raeburn <raeburn@raeburn.org> | 2000-04-08 19:33:36 +0000 |
| commit | f32318377bef5e5b07c0396fd77c3c7b0c107c82 (patch) | |
| tree | 9a53d4a3c7ec1473d8ccad45f398d31e812e2d19 /src/fontset.c | |
| parent | d35bee0ea6fd4db8a1ff830a34d64b4ffc87ccb4 (diff) | |
| download | emacs-f32318377bef5e5b07c0396fd77c3c7b0c107c82.tar.gz | |
(make_fontset_for_ascii_face): Use XINT on return value.
(Fset_fontset_font): Use EQ to compare lisp objects.
Diffstat (limited to 'src/fontset.c')
| -rw-r--r-- | src/fontset.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/fontset.c b/src/fontset.c index 0259b3e310d..00b605a6496 100644 --- a/src/fontset.c +++ b/src/fontset.c @@ -516,7 +516,7 @@ make_fontset_for_ascii_face (f, base_fontset_id) base_fontset = Vdefault_fontset; fontset = make_fontset (frame, Qnil, base_fontset); - return FONTSET_ID (fontset); + return XINT (FONTSET_ID (fontset)); } @@ -1032,7 +1032,7 @@ of a font for CHAR.") 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", |