diff options
| author | Po Lu | 2024-03-30 08:58:59 +0800 |
|---|---|---|
| committer | Po Lu | 2024-03-30 08:58:59 +0800 |
| commit | bfbddf65245e179ef25c3b9b2699515b2d33ecca (patch) | |
| tree | bf7b3a0bcdd5ca54038380258998b4597e80d488 /src | |
| parent | 717e7edc2ac1e4e04019319da19c5386077dfbea (diff) | |
| download | emacs-bfbddf65245e179ef25c3b9b2699515b2d33ecca.tar.gz emacs-bfbddf65245e179ef25c3b9b2699515b2d33ecca.zip | |
Fix building the SFNT font driver
* src/sfntfont.c (sfntfont_list, sfntfont_list_family): Update
calls to Fsort for the new calling convention.
Diffstat (limited to 'src')
| -rw-r--r-- | src/sfntfont.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/sfntfont.c b/src/sfntfont.c index 3be770f650e..fb3feaeaf79 100644 --- a/src/sfntfont.c +++ b/src/sfntfont.c | |||
| @@ -2029,7 +2029,7 @@ sfntfont_list (struct frame *f, Lisp_Object font_spec) | |||
| 2029 | caller) ordered first. */ | 2029 | caller) ordered first. */ |
| 2030 | 2030 | ||
| 2031 | XSETSUBR (compare_font_entities, &Scompare_font_entities.s); | 2031 | XSETSUBR (compare_font_entities, &Scompare_font_entities.s); |
| 2032 | matching = Fsort (matching, compare_font_entities); | 2032 | matching = CALLN (Fsort, matching, compare_font_entities); |
| 2033 | return matching; | 2033 | return matching; |
| 2034 | } | 2034 | } |
| 2035 | 2035 | ||
| @@ -3779,7 +3779,7 @@ sfntfont_list_family (struct frame *f) | |||
| 3779 | families = Fcons (desc->family, families); | 3779 | families = Fcons (desc->family, families); |
| 3780 | 3780 | ||
| 3781 | /* Sort families in preparation for removing duplicates. */ | 3781 | /* Sort families in preparation for removing duplicates. */ |
| 3782 | families = Fsort (families, Qstring_lessp); | 3782 | families = CALLN (Fsort, families, Qstring_lessp); |
| 3783 | 3783 | ||
| 3784 | /* Remove each duplicate within families. */ | 3784 | /* Remove each duplicate within families. */ |
| 3785 | 3785 | ||