X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/2749d28e1bd80262749657ee4a60e5b1f75b6cb8..c3702194809d8772afa226d5107ec3abb05e8d35:/src/fns.c diff --git a/src/fns.c b/src/fns.c index 72f1c93fd2..bf7b715223 100644 --- a/src/fns.c +++ b/src/fns.c @@ -25,16 +25,11 @@ along with GNU Emacs. If not, see . */ #endif #include -#ifndef MAC_OS -/* On Mac OS, defining this conflicts with precompiled headers. */ - /* Note on some machines this defines `vector' as a typedef, so make sure we don't use that name in this file. */ #undef vector #define vector ***** -#endif /* ! MAC_OSX */ - #include "lisp.h" #include "commands.h" #include "character.h" @@ -4205,7 +4200,7 @@ hash_put (h, key, value, hash) /* Remove the entry matching KEY from hash table H, if there is one. */ static void -hash_remove (h, key) +hash_remove_from_table (h, key) struct Lisp_Hash_Table *h; Lisp_Object key; { @@ -4866,7 +4861,7 @@ DEFUN ("remhash", Fremhash, Sremhash, 2, 2, 0, Lisp_Object key, table; { struct Lisp_Hash_Table *h = check_hash_table (table); - hash_remove (h, key); + hash_remove_from_table (h, key); return Qnil; } @@ -5234,7 +5229,10 @@ Used by `featurep' and `require', and altered by `provide'. */); DEFVAR_BOOL ("use-dialog-box", &use_dialog_box, doc: /* *Non-nil means mouse commands use dialog boxes to ask questions. This applies to `y-or-n-p' and `yes-or-no-p' questions asked by commands -invoked by mouse clicks and mouse menu items. */); +invoked by mouse clicks and mouse menu items. + +On some platforms, file selection dialogs are also enabled if this is +non-nil. */); use_dialog_box = 1; DEFVAR_BOOL ("use-file-dialog", &use_file_dialog,