Mercurial > hg > xemacs-beta

comparison src/dired-msw.c @ 398:74fd4e045ea6 r21-2-29

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-29
author cvs
date Mon, 13 Aug 2007 11:13:30 +0200
parents e11d67e05968
children de805c49cfc1
comparison
equal deleted inserted replaced
397:f4aeb21a5bad 398:74fd4e045ea6
73 #include "lisp.h" 73 #include "lisp.h"
74 74
75 #include "buffer.h" 75 #include "buffer.h"
76 #include "regex.h" 76 #include "regex.h"
77 77
78 #include "sysfile.h"
78 #include "sysdir.h" 79 #include "sysdir.h"
79 #include "sysfile.h"
80 #include "sysproc.h" 80 #include "sysproc.h"
81 81
82 #include <windows.h>
83 #include <limits.h> 82 #include <limits.h>
84 #include <time.h> 83 #include <time.h>
85 84
86 #include <winsock.h> /* To make nt.h happy */ 85 #include <winsock.h> /* To make nt.h happy */
87 #include "nt.h" /* For prototypes */ 86 #include "nt.h" /* For prototypes */
317 cptr[1] = cptr[4] = cptr[7] = '-'; 316 cptr[1] = cptr[4] = cptr[7] = '-';
318 } else { 317 } else {
319 cptr[1] = cptr[4] = cptr[7] = 'w'; 318 cptr[1] = cptr[4] = cptr[7] = 'w';
320 } 319 }
321 if ((file->dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) || 320 if ((file->dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) ||
322 len > 4 && 321 (len > 4 &&
323 (_stricmp(&file->cFileName[len - 4], ".exe") == 0 322 (_stricmp(&file->cFileName[len - 4], ".exe") == 0
324 || _stricmp(&file->cFileName[len - 4], ".com") == 0 323 || _stricmp(&file->cFileName[len - 4], ".com") == 0
325 || _stricmp(&file->cFileName[len - 4], ".bat") == 0 324 || _stricmp(&file->cFileName[len - 4], ".bat") == 0
326 #if 0 325 #if 0
327 || _stricmp(&file->cFileName[len - 4], ".pif") == 0 326 || _stricmp(&file->cFileName[len - 4], ".pif") == 0
328 #endif 327 #endif
329 )) 328 )))
330 { 329 {
331 cptr[2] = cptr[5] = cptr[8] = 'x'; 330 cptr[2] = cptr[5] = cptr[8] = 'x';
332 } else { 331 } else {
333 cptr[2] = cptr[5] = cptr[8] = '-'; 332 cptr[2] = cptr[5] = cptr[8] = '-';
334 } 333 }
637 636
638 637
639 void 638 void
640 vars_of_dired_mswindows (void) 639 vars_of_dired_mswindows (void)
641 { 640 {
642 DEFVAR_BOOL ("mswindows-ls-sort-case-insensitive", &mswindows_ls_sort_case_insensitive, /* 641 DEFVAR_BOOL ("mswindows-ls-sort-case-insensitive", &mswindows_ls_sort_case_insensitive /*
643 *Non-nil means filenames are sorted in a case-insensitive fashion. 642 *Non-nil means filenames are sorted in a case-insensitive fashion.
644 Nil means filenames are sorted in a case-sensitive fashion, just like Unix. 643 Nil means filenames are sorted in a case-sensitive fashion, just like Unix.
645 */ ); 644 */ );
646 mswindows_ls_sort_case_insensitive = 1; 645 mswindows_ls_sort_case_insensitive = 1;
647 646