diff options
author | Glenn Morris <rgm@gnu.org> | 2013-12-17 19:21:48 -0800 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2013-12-17 19:21:48 -0800 |
commit | 1f41ee56ace98fe0d5f288c97ddb73870befed45 (patch) | |
tree | 6bee6711c5e9c8d2cc03d102b8bd5e1b27ba13c7 /src/charset.c | |
parent | e82134b1e4efb363e21b1f9103af7ee5ec885ce4 (diff) | |
download | emacs-1f41ee56ace98fe0d5f288c97ddb73870befed45.tar.gz |
Add load-prefer-newer option, to load .el if newer than .elc
* src/lread.c (Fload): Pass load_prefer_newer to openp.
Don't bother checking mtime if openp already did it.
(openp): Add `newer' argument, to check all suffixes
and find the newest file.
(syms_of_lread) <load_prefer_newer>: New option.
* src/callproc.c (call_process):
* src/charset.c (load_charset_map_from_file):
* src/emacs.c (init_cmdargs):
* src/image.c (x_create_bitmap_from_file, x_find_image_file):
* src/lisp.h (openp):
* lread.c (Flocate_file_internal):
* src/process.c (Fformat_network_address):
* src/sound.c (Fplay_sound_internal):
* src/w32.c (check_windows_init_file):
* src/w32proc.c (sys_spawnve): Update for new arg spec of openp.
* lisp/Makefile.in (BYTE_COMPILE_FLAGS): Set load-prefer-newer to t.
* etc/NEWS: Mention this.
Fixes: debbugs:2061
Diffstat (limited to 'src/charset.c')
-rw-r--r-- | src/charset.c | 20 |
1 files changed, 11 insertions, 9 deletions
diff --git a/src/charset.c b/src/charset.c index 2ef060228ee..1e14475f111 100644 --- a/src/charset.c +++ b/src/charset.c @@ -1,13 +1,15 @@ /* Basic character set support. - Copyright (C) 2001-2013 Free Software Foundation, Inc. - Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, - 2005, 2006, 2007, 2008, 2009, 2010, 2011 - National Institute of Advanced Industrial Science and Technology (AIST) - Registration Number H14PRO021 - Copyright (C) 2003, 2004 - National Institute of Advanced Industrial Science and Technology (AIST) - Registration Number H13PRO009 +Copyright (C) 2001-2013 Free Software Foundation, Inc. + +Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, + 2005, 2006, 2007, 2008, 2009, 2010, 2011 + National Institute of Advanced Industrial Science and Technology (AIST) + Registration Number H14PRO021 + +Copyright (C) 2003, 2004 + National Institute of Advanced Industrial Science and Technology (AIST) + Registration Number H13PRO009 This file is part of GNU Emacs. @@ -493,7 +495,7 @@ load_charset_map_from_file (struct charset *charset, Lisp_Object mapfile, count = SPECPDL_INDEX (); record_unwind_protect_nothing (); specbind (Qfile_name_handler_alist, Qnil); - fd = openp (Vcharset_map_path, mapfile, suffixes, NULL, Qnil); + fd = openp (Vcharset_map_path, mapfile, suffixes, NULL, Qnil, 0); fp = fd < 0 ? 0 : fdopen (fd, "r"); if (!fp) { |