aboutsummaryrefslogtreecommitdiffstats
path: root/src/lread.c
diff options
context:
space:
mode:
authorMiles Bader2007-08-13 13:41:28 +0000
committerMiles Bader2007-08-13 13:41:28 +0000
commit37cc095b6a175fb5a2fb18fa029eaf3aa3b3fa53 (patch)
tree7fb68e80f66e55100c48b9751cf70c74af2d4bf1 /src/lread.c
parent031b6333283be57d971e557b83da31c6be937b0a (diff)
parent9d2db4c6637fe37d75f947063bcb2ecce319a1bc (diff)
downloademacs-37cc095b6a175fb5a2fb18fa029eaf3aa3b3fa53.tar.gz
emacs-37cc095b6a175fb5a2fb18fa029eaf3aa3b3fa53.zip
Merge from emacs--rel--22
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-851
Diffstat (limited to 'src/lread.c')
-rw-r--r--src/lread.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/lread.c b/src/lread.c
index 20587c6759e..282bf1d6b07 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -93,7 +93,7 @@ Lisp_Object Qfile_truename, Qdo_after_load_evaluation; /* ACM 2006/5/16 */
93extern Lisp_Object Qevent_symbol_element_mask; 93extern Lisp_Object Qevent_symbol_element_mask;
94extern Lisp_Object Qfile_exists_p; 94extern Lisp_Object Qfile_exists_p;
95 95
96/* non-zero iff inside `load' */ 96/* non-zero if inside `load' */
97int load_in_progress; 97int load_in_progress;
98 98
99/* Directory in which the sources were found. */ 99/* Directory in which the sources were found. */
@@ -1126,7 +1126,7 @@ in which case file-name-handlers are ignored. */)
1126 On success, returns a file descriptor. On failure, returns -1. 1126 On success, returns a file descriptor. On failure, returns -1.
1127 1127
1128 SUFFIXES is a list of strings containing possible suffixes. 1128 SUFFIXES is a list of strings containing possible suffixes.
1129 The empty suffix is automatically added iff the list is empty. 1129 The empty suffix is automatically added if the list is empty.
1130 1130
1131 PREDICATE non-nil means don't open the files, 1131 PREDICATE non-nil means don't open the files,
1132 just look for one that satisfies the predicate. In this case, 1132 just look for one that satisfies the predicate. In this case,
@@ -4077,7 +4077,7 @@ customize `jka-compr-load-suffixes' rather than the present variable. */);
4077 Vload_file_rep_suffixes = Fcons (empty_unibyte_string, Qnil); 4077 Vload_file_rep_suffixes = Fcons (empty_unibyte_string, Qnil);
4078 4078
4079 DEFVAR_BOOL ("load-in-progress", &load_in_progress, 4079 DEFVAR_BOOL ("load-in-progress", &load_in_progress,
4080 doc: /* Non-nil iff inside of `load'. */); 4080 doc: /* Non-nil if inside of `load'. */);
4081 4081
4082 DEFVAR_LISP ("after-load-alist", &Vafter_load_alist, 4082 DEFVAR_LISP ("after-load-alist", &Vafter_load_alist,
4083 doc: /* An alist of expressions to be evalled when particular files are loaded. 4083 doc: /* An alist of expressions to be evalled when particular files are loaded.