diff options
| author | Kim F. Storm | 2003-11-28 23:07:13 +0000 |
|---|---|---|
| committer | Kim F. Storm | 2003-11-28 23:07:13 +0000 |
| commit | 442d3fd0482e0db752c3de199d370d95f7c209c2 (patch) | |
| tree | 05fd95e43f762039acbf5935e2102510c31d870e /src/msdos.c | |
| parent | fdd401446906c15b45767ee1adf94821075c9dce (diff) | |
| download | emacs-442d3fd0482e0db752c3de199d370d95f7c209c2.tar.gz emacs-442d3fd0482e0db752c3de199d370d95f7c209c2.zip | |
(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.c | 12 |
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; | |||
| 413 | /* A flag to control how to display unibyte 8-bit characters. */ | 413 | /* A flag to control how to display unibyte 8-bit characters. */ |
| 414 | extern int unibyte_display_via_language_environment; | 414 | extern int unibyte_display_via_language_environment; |
| 415 | 415 | ||
| 416 | Lisp_Object Qbar, Qhbar; | 416 | extern Lisp_Object Qcursor_type; |
| 417 | extern Lisp_Object Qbar, Qhbar; | ||
| 417 | 418 | ||
| 418 | /* The screen colors of the current frame, which serve as the default | 419 | /* The screen colors of the current frame, which serve as the default |
| 419 | colors for newly-created frames. */ | 420 | colors for newly-created frames. */ |
| @@ -1993,8 +1994,6 @@ IT_update_end (struct frame *f) | |||
| 1993 | FRAME_X_DISPLAY_INFO (f)->mouse_face_defer = 0; | 1994 | FRAME_X_DISPLAY_INFO (f)->mouse_face_defer = 0; |
| 1994 | } | 1995 | } |
| 1995 | 1996 | ||
| 1996 | Lisp_Object Qcursor_type; | ||
| 1997 | |||
| 1998 | static void | 1997 | static void |
| 1999 | IT_frame_up_to_date (struct frame *f) | 1998 | IT_frame_up_to_date (struct frame *f) |
| 2000 | { | 1999 | { |
| @@ -5267,18 +5266,11 @@ syms_of_msdos () | |||
| 5267 | #ifndef HAVE_X_WINDOWS | 5266 | #ifndef HAVE_X_WINDOWS |
| 5268 | 5267 | ||
| 5269 | /* The following two are from xfns.c: */ | 5268 | /* The following two are from xfns.c: */ |
| 5270 | Qbar = intern ("bar"); | ||
| 5271 | staticpro (&Qbar); | ||
| 5272 | Qhbar = intern ("hbar"); | ||
| 5273 | staticpro (&Qhbar); | ||
| 5274 | Qcursor_type = intern ("cursor-type"); | ||
| 5275 | staticpro (&Qcursor_type); | ||
| 5276 | Qreverse = intern ("reverse"); | 5269 | Qreverse = intern ("reverse"); |
| 5277 | staticpro (&Qreverse); | 5270 | staticpro (&Qreverse); |
| 5278 | 5271 | ||
| 5279 | DEFVAR_LISP ("dos-unsupported-char-glyph", &Vdos_unsupported_char_glyph, | 5272 | DEFVAR_LISP ("dos-unsupported-char-glyph", &Vdos_unsupported_char_glyph, |
| 5280 | doc: /* *Glyph to display instead of chars not supported by current codepage. | 5273 | doc: /* *Glyph to display instead of chars not supported by current codepage. |
| 5281 | |||
| 5282 | This variable is used only by MSDOS terminals. */); | 5274 | This variable is used only by MSDOS terminals. */); |
| 5283 | Vdos_unsupported_char_glyph = '\177'; | 5275 | Vdos_unsupported_char_glyph = '\177'; |
| 5284 | 5276 | ||