diff options
author | Paul Eggert <eggert@cs.ucla.edu> | 2011-04-13 22:04:02 -0700 |
---|---|---|
committer | Paul Eggert <eggert@cs.ucla.edu> | 2011-04-13 22:04:02 -0700 |
commit | a7ca3326c4740ed3ed118b794d35d235de49f346 (patch) | |
tree | 5d38e0eac8e839c84a4ccb6e8a07c3c7858fff54 /src/font.c | |
parent | e87b6180b08c60a256dd8557945321ce2354a3a9 (diff) | |
download | emacs-a7ca3326c4740ed3ed118b794d35d235de49f346.tar.gz |
Undo the DEFUN->DEFUE change.
Diffstat (limited to 'src/font.c')
-rw-r--r-- | src/font.c | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/src/font.c b/src/font.c index 6f27e3b9c67..7d8b94bddf2 100644 --- a/src/font.c +++ b/src/font.c @@ -3764,7 +3764,7 @@ which kind of font it is. It must be one of `font-spec', `font-entity', wrong_type_argument (intern ("font-extra-type"), extra_type); } -DEFUE ("font-spec", Ffont_spec, Sfont_spec, 0, MANY, 0, +DEFUN ("font-spec", Ffont_spec, Sfont_spec, 0, MANY, 0, doc: /* Return a newly created font-spec with arguments as properties. ARGS must come in pairs KEY VALUE of font properties. KEY must be a @@ -3923,7 +3923,7 @@ merge_font_spec (Lisp_Object from, Lisp_Object to) return to; } -DEFUE ("font-get", Ffont_get, Sfont_get, 2, 2, 0, +DEFUN ("font-get", Ffont_get, Sfont_get, 2, 2, 0, doc: /* Return the value of FONT's property KEY. FONT is a font-spec, a font-entity, or a font-object. KEY is any symbol, but these are reserved for specific meanings: @@ -4055,7 +4055,7 @@ are to be displayed on. If omitted, the selected frame is used. */) #endif -DEFUE ("font-put", Ffont_put, Sfont_put, 3, 3, 0, +DEFUN ("font-put", Ffont_put, Sfont_put, 3, 3, 0, doc: /* Set one property of FONT: give property KEY value VAL. FONT is a font-spec, a font-entity, or a font-object. @@ -4089,7 +4089,7 @@ accepted by `font-spec'. */) return val; } -DEFUE ("list-fonts", Flist_fonts, Slist_fonts, 1, 4, 0, +DEFUN ("list-fonts", Flist_fonts, Slist_fonts, 1, 4, 0, doc: /* List available fonts matching FONT-SPEC on the current frame. Optional 2nd argument FRAME specifies the target frame. Optional 3rd argument NUM, if non-nil, limits the number of returned fonts. @@ -4183,7 +4183,7 @@ Optional 2nd argument FRAME, if non-nil, specifies the target frame. */) return val; } -DEFUE ("font-xlfd-name", Ffont_xlfd_name, Sfont_xlfd_name, 1, 2, 0, +DEFUN ("font-xlfd-name", Ffont_xlfd_name, Sfont_xlfd_name, 1, 2, 0, doc: /* Return XLFD name of FONT. FONT is a font-spec, font-entity, or font-object. If the name is too long for XLFD (maximum 255 chars), return nil. @@ -4405,7 +4405,7 @@ where #if 0 -DEFUE ("font-drive-otf", Ffont_drive_otf, Sfont_drive_otf, 6, 6, 0, +DEFUN ("font-drive-otf", Ffont_drive_otf, Sfont_drive_otf, 6, 6, 0, doc: /* Apply OpenType features on glyph-string GSTRING-IN. OTF-FEATURES specifies which features to apply in this format: (SCRIPT LANGSYS GSUB GPOS) @@ -4475,7 +4475,7 @@ glyph-string. */) return make_number (num); } -DEFUE ("font-otf-alternates", Ffont_otf_alternates, Sfont_otf_alternates, +DEFUN ("font-otf-alternates", Ffont_otf_alternates, Sfont_otf_alternates, 3, 3, 0, doc: /* Return a list of alternate glyphs of CHARACTER in FONT-OBJECT. OTF-FEATURES specifies which features of the font FONT-OBJECT to apply |