summaryrefslogtreecommitdiff
path: root/src/msdos.c
diff options
context:
space:
mode:
authorKim F. Storm <storm@cua.dk>2003-11-28 23:07:13 +0000
committerKim F. Storm <storm@cua.dk>2003-11-28 23:07:13 +0000
commit442d3fd0482e0db752c3de199d370d95f7c209c2 (patch)
tree05fd95e43f762039acbf5935e2102510c31d870e /src/msdos.c
parentfdd401446906c15b45767ee1adf94821075c9dce (diff)
downloademacs-442d3fd0482e0db752c3de199d370d95f7c209c2.tar.gz
(Qcursor_type, Qbar, Qhbar): Declare extern.
(syms_of_msdos): Don't intern and staticpro them.
Diffstat (limited to 'src/msdos.c')
-rw-r--r--src/msdos.c12
1 files changed, 2 insertions, 10 deletions
diff --git a/src/msdos.c b/src/msdos.c
index b04b55c2260..a2fd011e74c 100644
--- a/src/msdos.c
+++ b/src/msdos.c
@@ -413,7 +413,8 @@ static unsigned short screen_virtual_offset = 0;
/* A flag to control how to display unibyte 8-bit characters. */
extern int unibyte_display_via_language_environment;
-Lisp_Object Qbar, Qhbar;
+extern Lisp_Object Qcursor_type;
+extern Lisp_Object Qbar, Qhbar;
/* The screen colors of the current frame, which serve as the default
colors for newly-created frames. */
@@ -1993,8 +1994,6 @@ IT_update_end (struct frame *f)
FRAME_X_DISPLAY_INFO (f)->mouse_face_defer = 0;
}
-Lisp_Object Qcursor_type;
-
static void
IT_frame_up_to_date (struct frame *f)
{
@@ -5267,18 +5266,11 @@ syms_of_msdos ()
#ifndef HAVE_X_WINDOWS
/* The following two are from xfns.c: */
- Qbar = intern ("bar");
- staticpro (&Qbar);
- Qhbar = intern ("hbar");
- staticpro (&Qhbar);
- Qcursor_type = intern ("cursor-type");
- staticpro (&Qcursor_type);
Qreverse = intern ("reverse");
staticpro (&Qreverse);
DEFVAR_LISP ("dos-unsupported-char-glyph", &Vdos_unsupported_char_glyph,
doc: /* *Glyph to display instead of chars not supported by current codepage.
-
This variable is used only by MSDOS terminals. */);
Vdos_unsupported_char_glyph = '\177';