Commit 16390cd2 authored by Paul Eggert's avatar Paul Eggert
Browse files

* dired.c (file_name_completion): Now static.

* dbusbind.c (xd_in_read_queued_messages): Now static.
parent a25f4dfa
2011-04-12 Paul Eggert <eggert@cs.ucla.edu>
* dired.c (file_name_completion): Now static.
* dbusbind.c (xd_in_read_queued_messages): Now static.
* lisp.h (circular_list_error, FOREACH): Remove; unused.
* data.c (circular_list_error): Remove.
......
......@@ -76,7 +76,7 @@ static Lisp_Object QCdbus_type_array, QCdbus_type_variant;
static Lisp_Object QCdbus_type_struct, QCdbus_type_dict_entry;
/* Whether we are reading a D-Bus event. */
int xd_in_read_queued_messages = 0;
static int xd_in_read_queued_messages = 0;
/* We use "xd_" and "XD_" as prefix for all internal symbols, because
......
......@@ -381,7 +381,9 @@ which see. */)
}
Lisp_Object file_name_completion (Lisp_Object file, Lisp_Object dirname, int all_flag, int ver_flag, Lisp_Object predicate);
static Lisp_Object file_name_completion
(Lisp_Object file, Lisp_Object dirname, int all_flag, int ver_flag,
Lisp_Object predicate);
DEFUN ("file-name-completion", Ffile_name_completion, Sfile_name_completion,
2, 3, 0,
......@@ -441,7 +443,7 @@ These are all file names in directory DIRECTORY which begin with FILE. */)
static int file_name_completion_stat (Lisp_Object dirname, DIRENTRY *dp, struct stat *st_addr);
static Lisp_Object Qdefault_directory;
Lisp_Object
static Lisp_Object
file_name_completion (Lisp_Object file, Lisp_Object dirname, int all_flag, int ver_flag, Lisp_Object predicate)
{
DIR *d;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment