Mercurial > hg > xemacs-beta
comparison src/lisp.h @ 5211:cdca98f2d36f
Move `default-file-system-ignore-case' to C; fix bug in directory hash tables
src/ChangeLog addition:
2010-05-16 Aidan Kehoe <kehoea@parhasard.net>
Move `default-file-system-ignore-case' to C; pay attention to it
in creating the directory hash tables for #'locate-file. Fix a bug
where #'eq was specified when creating directory hash tables in
dired.c.
* config.h.in (DEFAULT_FILE_SYSTEM_IGNORE_CASE): This is 1 on
Darwin.
* dired.c (make_directory_hash_table): If
#'file-system-ignore-case-p gives non-nil for a directory, created
the associated hash table with #'equalp as its test. Never use
#'eq as a directory hash table test.
* fileio.c (vars_of_fileio):
Move `default-file-system-ignore-case' here, so it can be a
constant boolean reflecting a compile-time #define.
* lisp.h: Update the declaration of make_directory_hash_table;
remove the declaration of wasteful_word_to_lisp, which was
#ifdef'd out.
* lread.c (Flocate_file): Take out a debugging statement from
this function.
(locate_file_refresh_hashing): Call make_directory_hash_table with
a Lisp string, not an Ibyte pointer.
(vars_of_lread): If DEFAULT_FILE_SYSTEM_IGNORE_CASE is defined,
use #'equalp as the hash table test for locate-file-hash-table,
not #'equal.
* s/win32-common.h (DEFAULT_FILE_SYSTEM_IGNORE_CASE):
Case should normally be ignored in file names on Win32.
lisp/ChangeLog addition:
2010-05-16 Aidan Kehoe <kehoea@parhasard.net>
* files.el (default-file-system-ignore-case):
Move this to fileio.c, where it's a constant boolean variable
initialised at dump time.
author | Aidan Kehoe <kehoea@parhasard.net> |
---|---|
date | Sun, 16 May 2010 12:33:21 +0100 |
parents | 70ed8a0d8da8 |
children | 0b4d355771bd |
comparison
equal
deleted
inserted
replaced
5208:9fa29ec759e3 | 5211:cdca98f2d36f |
---|---|
4502 | 4502 |
4503 /* Defined in device-x.c */ | 4503 /* Defined in device-x.c */ |
4504 extern Lisp_Object Vx_initial_argv_list; | 4504 extern Lisp_Object Vx_initial_argv_list; |
4505 | 4505 |
4506 /* Defined in dired.c */ | 4506 /* Defined in dired.c */ |
4507 Lisp_Object make_directory_hash_table (const Ibyte *); | 4507 Lisp_Object make_directory_hash_table (Lisp_Object); |
4508 Lisp_Object wasteful_word_to_lisp (unsigned int); | |
4509 | 4508 |
4510 /* Defined in doc.c */ | 4509 /* Defined in doc.c */ |
4511 EXFUN (Fsubstitute_command_keys, 1); | 4510 EXFUN (Fsubstitute_command_keys, 1); |
4512 | 4511 |
4513 Lisp_Object unparesseuxify_doc_string (int fd, EMACS_INT position, | 4512 Lisp_Object unparesseuxify_doc_string (int fd, EMACS_INT position, |