Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
4bf91535
Commit
4bf91535
authored
May 09, 2004
by
Jason Rumney
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
(Vw32_ansi_code_page): New Lisp variable.
(globals_of_w32fns): Set it.
parent
b0efcd2e
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
8 additions
and
0 deletions
+8
-0
src/w32fns.c
src/w32fns.c
+8
-0
No files found.
src/w32fns.c
View file @
4bf91535
...
...
@@ -234,6 +234,9 @@ Lisp_Object Qw32_charset_mac;
Lisp_Object Qw32_charset_unicode;
#endif
/* The ANSI codepage. */
Lisp_Object Vw32_ansi_code_page;
/* Prefix for system colors. */
#define SYSTEM_COLOR_PREFIX "System"
#define SYSTEM_COLOR_PREFIX_LEN (sizeof (SYSTEM_COLOR_PREFIX) - 1)
...
...
@@ -8793,6 +8796,11 @@ void globals_of_w32fns ()
/* ditto for GetClipboardSequenceNumber. */
clipboard_sequence_fn = (ClipboardSequence_Proc)
GetProcAddress (user32_lib, "GetClipboardSequenceNumber");
DEFVAR_INT ("w32-ansi-code-page",
&Vw32_ansi_code_page,
doc: /* The ANSI code page used by the system. */);
XSETINT (Vw32_ansi_code_page, GetACP ());
}
#undef abort
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment