Mercurial > emacs

changeset 5948:ef777779bd80

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(check_x): Make it global. (x-parse-geometry, x-list-fonts): call check_x.
author Karl Heuer <kwzh@gnu.org>
date Mon, 14 Feb 1994 21:41:46 +0000
parents 9ff439565145
children f394f25efb3c
files src/xfns.c
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/xfns.c	Mon Feb 14 21:40:43 1994 +0000
+++ b/src/xfns.c	Mon Feb 14 21:41:46 1994 +0000
@@ -234,7 +234,7 @@
 
 
 /* Error if we are not connected to X.  */
-static void
+void
 check_x ()
 {
   if (x_current_display == 0)
@@ -1487,6 +1487,7 @@
   unsigned int width, height;
   Lisp_Object values[4];
 
+  check_x ();
   CHECK_STRING (string, 0);
 
   geometry = XParseGeometry ((char *) XSTRING (string)->data,
@@ -2525,6 +2526,7 @@
   XFontStruct *size_ref;
   Lisp_Object list;
 
+  check_x ();
   CHECK_STRING (pattern, 0);
   if (!NILP (face))
     CHECK_SYMBOL (face, 1);