Mercurial > hg > xemacs-beta

comparison src/device-msw.c @ 263:727739f917cb r20-5b30

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-5b30
author cvs
date Mon, 13 Aug 2007 10:24:41 +0200
parents 83b3d10dcba9
children 966663fcf606
comparison
equal deleted inserted replaced
262:9d8607af9e13 263:727739f917cb
43 DWORD mswindows_dde_mlid; 43 DWORD mswindows_dde_mlid;
44 HSZ mswindows_dde_service; 44 HSZ mswindows_dde_service;
45 HSZ mswindows_dde_topic_system; 45 HSZ mswindows_dde_topic_system;
46 HSZ mswindows_dde_item_open; 46 HSZ mswindows_dde_item_open;
47 47
48
49 /* Control conversion of upper case file names to lower case.
50 nil means no, t means yes. */
51 Lisp_Object Vmswindows_downcase_file_names;
52
53 /* Control whether stat() attempts to determine file type and link count
54 exactly, at the expense of slower operation. Since true hard links
55 are supported on NTFS volumes, this is only relevant on NT. */
56 Lisp_Object Vmswindows_get_true_file_attributes;
57
48 Lisp_Object Qinit_pre_mswindows_win, Qinit_post_mswindows_win; 58 Lisp_Object Qinit_pre_mswindows_win, Qinit_post_mswindows_win;
59
49 60
50 static void 61 static void
51 mswindows_init_device (struct device *d, Lisp_Object props) 62 mswindows_init_device (struct device *d, Lisp_Object props)
52 { 63 {
53 WNDCLASSEX wc; 64 WNDCLASSEX wc;
162 void 173 void
163 syms_of_device_mswindows (void) 174 syms_of_device_mswindows (void)
164 { 175 {
165 defsymbol (&Qinit_pre_mswindows_win, "init-pre-mswindows-win"); 176 defsymbol (&Qinit_pre_mswindows_win, "init-pre-mswindows-win");
166 defsymbol (&Qinit_post_mswindows_win, "init-post-mswindows-win"); 177 defsymbol (&Qinit_post_mswindows_win, "init-post-mswindows-win");
178
179 DEFVAR_LISP ("mswindows-downcase-file-names", &Vmswindows_downcase_file_names /*
180 Non-nil means convert all-upper case file names to lower case.
181 This applies when performing completions and file name expansion.*/ );
182 Vmswindows_downcase_file_names = Qnil;
183
184 DEFVAR_LISP ("mswindows-get-true-file-attributes", &Vmswindows_get_true_file_attributes /*
185 "Non-nil means determine accurate link count in file-attributes.
186 This option slows down file-attributes noticeably, so is disabled by
187 default. Note that it is only useful for files on NTFS volumes,
188 where hard links are supported.
189 */ );
190 Vmswindows_get_true_file_attributes = Qnil;
167 } 191 }
168 192
169 void 193 void
170 console_type_create_device_mswindows (void) 194 console_type_create_device_mswindows (void)
171 { 195 {