[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/src/nsfns.m,v
From: |
Adrian Robert |
Subject: |
[Emacs-diffs] Changes to emacs/src/nsfns.m,v |
Date: |
Wed, 23 Jul 2008 02:53:43 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Adrian Robert <arobert> 08/07/23 02:53:42
Index: nsfns.m
===================================================================
RCS file: /sources/emacs/emacs/src/nsfns.m,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -b -r1.14 -r1.15
--- nsfns.m 23 Jul 2008 02:51:09 -0000 1.14
+++ nsfns.m 23 Jul 2008 02:53:42 -0000 1.15
@@ -1840,65 +1840,6 @@
}
-#if 0
-DEFUN ("x-list-fonts", Fx_list_fonts, Sx_list_fonts, 1, 4, 0,
- doc: /* Return a list of the names of available fonts matching PATTERN.
-If optional arguments FACE and FRAME are specified, return only fonts
-the same size as FACE on FRAME.
-If optional argument MAX is specified, return at most MAX matches.
-
-PATTERN is a regular expression; FACE is a face name - a symbol.
-
-The return value is a list of strings, suitable as arguments to
-set-face-font.
-
-The font names are _NOT_ X names. */)
- (pattern, face, frame, max)
- Lisp_Object pattern, face, frame, max;
-{
- Lisp_Object flist, olist = Qnil, tem;
- struct frame *f;
- int maxnames;
-
- /* We can't simply call check_x_frame because this function may be
- called before any frame is created. */
- if (NILP (frame))
- f = SELECTED_FRAME ();
- else
- {
- CHECK_LIVE_FRAME (frame);
- f = XFRAME (frame);
- }
- if (! FRAME_WINDOW_P (f))
- {
- /* Perhaps we have not yet created any frame. */
- f = NULL;
- }
-
- if (NILP (max))
- maxnames = 4;
- else
- {
- CHECK_NATNUM (max);
- maxnames = XFASTINT (max);
- }
-
- /* get XLFD names */
- flist = ns_list_fonts (f, pattern, 0, maxnames);
-
- /* convert list into regular names */
- for (tem = flist; CONSP (tem); tem = XCDR (tem))
- {
- Lisp_Object fname = XCAR (tem);
- olist = Fcons (build_string (ns_xlfd_to_fontname (SDATA (fname))),
- olist);
- }
-
- return olist;
-}
-#endif
-
-
DEFUN ("ns-font-name", Fns_font_name, Sns_font_name, 1, 1, 0,
doc: /* Determine font postscript or family name for font NAME.
NAME should be a string containing either the font name or an XLFD
- [Emacs-diffs] Changes to emacs/src/nsfns.m,v, (continued)
- [Emacs-diffs] Changes to emacs/src/nsfns.m,v, Stefan Monnier, 2008/07/16
- [Emacs-diffs] Changes to emacs/src/nsfns.m,v, Adrian Robert, 2008/07/17
- [Emacs-diffs] Changes to emacs/src/nsfns.m,v, Adrian Robert, 2008/07/19
- [Emacs-diffs] Changes to emacs/src/nsfns.m,v, Chong Yidong, 2008/07/21
- [Emacs-diffs] Changes to emacs/src/nsfns.m,v, Dan Nicolaescu, 2008/07/21
- [Emacs-diffs] Changes to emacs/src/nsfns.m,v, Adrian Robert, 2008/07/21
- [Emacs-diffs] Changes to emacs/src/nsfns.m,v, David Reitter, 2008/07/21
- [Emacs-diffs] Changes to emacs/src/nsfns.m,v, Dan Nicolaescu, 2008/07/22
- [Emacs-diffs] Changes to emacs/src/nsfns.m,v, Dan Nicolaescu, 2008/07/22
- [Emacs-diffs] Changes to emacs/src/nsfns.m,v, Adrian Robert, 2008/07/22
- [Emacs-diffs] Changes to emacs/src/nsfns.m,v,
Adrian Robert <=
- [Emacs-diffs] Changes to emacs/src/nsfns.m,v, Adrian Robert, 2008/07/27
- [Emacs-diffs] Changes to emacs/src/nsfns.m,v, Adrian Robert, 2008/07/27