aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1994-03-28 18:36:14 +0000
committerRichard M. Stallman1994-03-28 18:36:14 +0000
commit3e01fd9daa06241e8b3a48812c64969cc79c8092 (patch)
treef377fc32fe1f913798bb215750f3705ce418806b
parent3ea1f391dac6e2f78c046b0f3cb8bf150b70f4ca (diff)
downloademacs-3e01fd9daa06241e8b3a48812c64969cc79c8092.tar.gz
emacs-3e01fd9daa06241e8b3a48812c64969cc79c8092.zip
Initial revision
-rw-r--r--lispref/files.texi1893
-rw-r--r--lispref/minibuf.texi1404
2 files changed, 3297 insertions, 0 deletions
diff --git a/lispref/files.texi b/lispref/files.texi
new file mode 100644
index 00000000000..5cd8b175e79
--- /dev/null
+++ b/lispref/files.texi
@@ -0,0 +1,1893 @@
1@c -*-texinfo-*-
2@c This is part of the GNU Emacs Lisp Reference Manual.
3@c Copyright (C) 1990, 1991, 1992, 1993, 1994 Free Software Foundation, Inc.
4@c See the file elisp.texi for copying conditions.
5@setfilename ../info/files
6@node Files, Backups and Auto-Saving, Documentation, Top
7@comment node-name, next, previous, up
8@chapter Files
9
10 In Emacs, you can find, create, view, save, and otherwise work with
11files and file directories. This chapter describes most of the
12file-related functions of Emacs Lisp, but a few others are described in
13@ref{Buffers}, and those related to backups and auto-saving are
14described in @ref{Backups and Auto-Saving}.
15
16@menu
17* Visiting Files:: Reading files into Emacs buffers for editing.
18* Saving Buffers:: Writing changed buffers back into files.
19* Reading from Files:: Reading files into buffers without visiting.
20* Writing to Files:: Writing new files from parts of buffers.
21* File Locks:: Locking and unlocking files, to prevent
22 simultaneous editing by two people.
23* Information about Files:: Testing existence, accessibility, size of files.
24* Changing File Attributes:: Renaming files, changing protection, etc.
25* File Names:: Decomposing and expanding file names.
26* Contents of Directories:: Getting a list of the files in a directory.
27* Create/Delete Dirs:: Creating and Deleting Directories.
28* Magic File Names:: Defining "magic" special handling
29 for certain file names.
30@end menu
31
32@node Visiting Files
33@section Visiting Files
34@cindex finding files
35@cindex visiting files
36
37 Visiting a file means reading a file into a buffer. Once this is
38done, we say that the buffer is @dfn{visiting} that file, and call the
39file ``the visited file'' of the buffer.
40
41 A file and a buffer are two different things. A file is information
42recorded permanently in the computer (unless you delete it). A buffer,
43on the other hand, is information inside of Emacs that will vanish at
44the end of the editing session (or when you kill the buffer). Usually,
45a buffer contains information that you have copied from a file; then we
46say the buffer is visiting that file. The copy in the buffer is what
47you modify with editing commands. Such changes to the buffer do not
48change the file; therefore, to make the changes permanent, you must
49@dfn{save} the buffer, which means copying the altered buffer contents
50back into the file.
51
52 In spite of the distinction between files and buffers, people often
53refer to a file when they mean a buffer and vice-versa. Indeed, we say,
54``I am editing a file,'' rather than, ``I am editing a buffer which I
55will soon save as a file of the same name.'' Humans do not usually need
56to make the distinction explicit. When dealing with a computer program,
57however, it is good to keep the distinction in mind.
58
59@menu
60* Visiting Functions:: The usual interface functions for visiting.
61* Subroutines of Visiting:: Lower-level subroutines that they use.
62@end menu
63
64@node Visiting Functions
65@subsection Functions for Visiting Files
66
67 This section describes the functions normally used to visit files.
68For historical reasons, these functions have names starting with
69@samp{find-} rather than @samp{visit-}. @xref{Buffer File Name}, for
70functions and variables that access the visited file name of a buffer or
71that find an existing buffer by its visited file name.
72
73@deffn Command find-file filename
74This command selects a buffer visiting the file @var{filename},
75using an existing buffer if there is one, and otherwise creating a
76new buffer and reading the file into it. It also returns that buffer.
77
78The body of the @code{find-file} function is very simple and looks
79like this:
80
81@example
82(switch-to-buffer (find-file-noselect filename))
83@end example
84
85@noindent
86(See @code{switch-to-buffer} in @ref{Displaying Buffers}.)
87
88When @code{find-file} is called interactively, it prompts for
89@var{filename} in the minibuffer.
90@end deffn
91
92@defun find-file-noselect filename
93This function is the guts of all the file-visiting functions. It finds
94or creates a buffer visiting the file @var{filename}, and returns it.
95It uses an existing buffer if there is one, and otherwise creates a new
96buffer and reads the file into it. You may make the buffer current or
97display it in a window if you wish, but this function does not do so.
98
99When @code{find-file-noselect} uses an existing buffer, it first
100verifies that the file has not changed since it was last visited or
101saved in that buffer. If the file has changed, then this function asks
102the user whether to reread the changed file. If the user says
103@samp{yes}, any changes previously made in the buffer are lost.
104
105If @code{find-file-noselect} needs to create a buffer, and there is no
106file named @var{filename}, it displays the message @samp{New file} in
107the echo area, and leaves the buffer empty.
108
109The @code{find-file-noselect} function calls @code{after-find-file}
110after reading the file (@pxref{Subroutines of Visiting}). That function
111sets the buffer major mode, parses local variables, warns the user if
112there exists an auto-save file more recent than the file just visited,
113and finishes by running the functions in @code{find-file-hooks}.
114
115The @code{find-file-noselect} function returns the buffer that is
116visiting the file @var{filename}.
117
118@example
119@group
120(find-file-noselect "/etc/fstab")
121 @result{} #<buffer fstab>
122@end group
123@end example
124@end defun
125
126@deffn Command find-alternate-file filename
127This command selects a buffer visiting the file @var{filename}, then
128kills the buffer that was previously displayed in the selected window.
129It is useful if you have visited the wrong file by mistake, so that you
130can get rid of the buffer that you did not want to create, at the same
131time as you visit the file you intended.
132
133When this command is called interactively, it prompts for @var{filename}.
134@end deffn
135
136@deffn Command find-file-other-window filename
137This command selects a buffer visiting the file @var{filename}, but
138does so in a window other than the selected window. It may use another
139existing window or split a window; see @ref{Displaying Buffers}.
140
141When this command is called interactively, it prompts for
142@var{filename}.
143@end deffn
144
145@deffn Command find-file-read-only filename
146This command selects a buffer visiting the file @var{filename}, like
147@code{find-file}, but it marks the buffer as read-only. @xref{Read Only
148Buffers}, for related functions and variables.
149
150When this command is called interactively, it prompts for
151@var{filename}.
152@end deffn
153
154@deffn Command view-file filename
155This command views @var{filename} in View mode, returning to the
156previous buffer when done. View mode is a mode that allows you to skim
157rapidly through the file but does not let you modify it. Entering View
158mode runs the normal hook @code{view-mode-hook}. @xref{Hooks}.
159
160When @code{view-file} is called interactively, it prompts for
161@var{filename}.
162@end deffn
163
164@defvar find-file-hooks
165The value of this variable is a list of functions to be called after a
166file is visited. The file's local-variables specification (if any) will
167have been processed before the hooks are run. The buffer visiting the
168file is current when the hook functions are run.
169
170This variable works just like a normal hook, but we think that renaming
171it would not be advisable.
172@end defvar
173
174@defvar find-file-not-found-hooks
175The value of this variable is a list of functions to be called when
176@code{find-file} or @code{find-file-noselect} is passed a nonexistent
177file name. @code{find-file-noselect} calls these functions as soon as
178it detects a nonexistent file. It calls them in the order of the list,
179until one of them returns non-@code{nil}. @code{buffer-file-name} is
180already set up.
181
182This is not a normal hook because the values of the functions are
183used and they may not all be called.
184@end defvar
185
186@node Subroutines of Visiting
187@comment node-name, next, previous, up
188@subsection Subroutines of Visiting
189
190 The @code{find-file-noselect} function uses the
191@code{create-file-buffer} and @code{after-find-file} functions as
192subroutines. Sometimes it is useful to call them directly.
193
194@defun create-file-buffer filename
195This function creates a suitably named buffer for visiting
196@var{filename}, and returns it. It uses @var{filename} (sans directory)
197as the name if that name is free; otherwise, it appends a string such as
198@samp{<2>} to get an unused name. See also @ref{Creating Buffers}.
199
200@strong{Please note:} @code{create-file-buffer} does @emph{not}
201associate the new buffer with a file and does not select the buffer.
202
203@example
204@group
205(create-file-buffer "foo")
206 @result{} #<buffer foo>
207@end group
208@group
209(create-file-buffer "foo")
210 @result{} #<buffer foo<2>>
211@end group
212@group
213(create-file-buffer "foo")
214 @result{} #<buffer foo<3>>
215@end group
216@end example
217
218This function is used by @code{find-file-noselect}.
219It uses @code{generate-new-buffer} (@pxref{Creating Buffers}).
220@end defun
221
222@defun after-find-file &optional error warn
223This function sets the buffer major mode, and parses local variables
224(@pxref{Auto Major Mode}). It is called by @code{find-file-noselect}
225and by the default revert function (@pxref{Reverting}).
226
227@cindex new file message
228@cindex file open error
229If reading the file got an error because the file does not exist, but
230its directory does exist, the caller should pass a non-@code{nil} value
231for @var{error}. In that case, @code{after-find-file} issues a warning:
232@samp{(New File)}. For more serious errors, the caller should usually not
233call @code{after-find-file}.
234
235If @var{warn} is non-@code{nil}, then this function issues a warning
236if an auto-save file exists and is more recent than the visited file.
237
238The last thing @code{after-find-file} does is call all the functions
239in @code{find-file-hooks}.
240@end defun
241
242@node Saving Buffers
243@section Saving Buffers
244
245 When you edit a file in Emacs, you are actually working on a buffer
246that is visiting that file---that is, the contents of the file are
247copied into the buffer and the copy is what you edit. Changes to the
248buffer do not change the file until you @dfn{save} the buffer, which
249means copying the contents of the buffer into the file.
250
251@deffn Command save-buffer &optional backup-option
252This function saves the contents of the current buffer in its visited
253file if the buffer has been modified since it was last visited or saved.
254Otherwise it does nothing.
255
256@code{save-buffer} is responsible for making backup files. Normally,
257@var{backup-option} is @code{nil}, and @code{save-buffer} makes a backup
258file only if this is the first save or if the buffer was previously
259modified. Other values for @var{backup-option} request the making of
260backup files in other circumstances:
261
262@itemize @bullet
263@item
264With an argument of 4 or 64, reflecting 1 or 3 @kbd{C-u}'s, the
265@code{save-buffer} function marks this version of the file to be
266backed up when the buffer is next saved.
267
268@item
269With an argument of 16 or 64, reflecting 2 or 3 @kbd{C-u}'s, the
270@code{save-buffer} function unconditionally backs up the previous
271version of the file before saving it.
272@end itemize
273@end deffn
274
275@deffn Command save-some-buffers &optional save-silently-p exiting
276This command saves some modified file-visiting buffers. Normally it
277asks the user about each buffer. But if @var{save-silently-p} is
278non-@code{nil}, it saves all the file-visiting buffers without querying
279the user.
280
281The optional @var{exiting} argument, if non-@code{nil}, requests this
282function to offer also to save certain other buffers that are not
283visiting files. These are buffers that have a non-@code{nil} local
284value of @code{buffer-offer-save}. (A user who says yes to saving one
285of these is asked to specify a file name to use.) The
286@code{save-buffers-kill-emacs} function passes a non-@code{nil} value
287for this argument.
288@end deffn
289
290@defvar buffer-offer-save
291When this variable is non-@code{nil} in a buffer, Emacs offers to save
292the buffer on exit even if the buffer is not visiting a file. The
293variable is automatically local in all buffers. Normally, Mail mode
294(used for editing outgoing mail) sets this to @code{t}.
295@end defvar
296
297@deffn Command write-file filename
298This function writes the current buffer into file @var{filename}, makes
299the buffer visit that file, and marks it not modified. Then it renames
300the buffer based on @var{filename}, appending a string like @samp{<2>}
301if necessary to make a unique buffer name. It does most of this work by
302calling @code{set-visited-file-name} and @code{save-buffer}.
303@end deffn
304
305@defvar write-file-hooks
306The value of this variable is a list of functions to be called before
307writing out a buffer to its visited file. If one of them returns
308non-@code{nil}, the file is considered already written and the rest of
309the functions are not called, nor is the usual code for writing the file
310executed.
311
312If a function in @code{write-file-hooks} returns non-@code{nil}, it
313is responsible for making a backup file (if that is appropriate).
314To do so, execute the following code:
315
316@example
317(or buffer-backed-up (backup-buffer))
318@end example
319
320You might wish to save the file modes value returned by
321@code{backup-buffer} and use that to set the mode bits of the file that
322you write. This is what @code{save-buffer} normally does.
323
324Even though this is not a normal hook, you can use @code{add-hook} and
325@code{remove-hook} to manipulate the list. @xref{Hooks}.
326@end defvar
327
328@c Emacs 19 feature
329@defvar local-write-file-hooks
330This works just like @code{write-file-hooks}, but it is intended
331to be made local to particular buffers. It's not a good idea to make
332@code{write-file-hooks} local to a buffer---use this variable instead.
333
334The variable is marked as a permanent local, so that changing the major
335mode does not alter a buffer-local value. This is convenient for
336packages that read ``file'' contents in special ways, and set up hooks
337to save the data in a corresponding way.
338@end defvar
339
340@c Emacs 19 feature
341@defvar write-contents-hooks
342This works just like @code{write-file-hooks}, but it is intended for
343hooks that pertain to the contents of the file, as opposed to hooks that
344pertain to where the file came from. Typically major mode commands make
345buffer-local bindings for this variable.
346@end defvar
347
348@c Emacs 19 feature
349@defvar after-save-hook
350This normal hook runs after a buffer has been saved in its visited file.
351@end defvar
352
353@defvar file-precious-flag
354If this variable is non-@code{nil}, then @code{save-buffer} protects
355against I/O errors while saving by writing the new file to a temporary
356name instead of the name it is supposed to have, and then renaming it to
357the intended name after it is clear there are no errors. This procedure
358prevents problems such as a lack of disk space from resulting in an
359invalid file.
360
361(This feature worked differently in older Emacs versions.)
362
363Some modes set this non-@code{nil} locally in particular buffers.
364@end defvar
365
366@defopt require-final-newline
367This variable determines whether files may be written out that do
368@emph{not} end with a newline. If the value of the variable is
369@code{t}, then @code{save-buffer} silently adds a newline at the end of
370the file whenever the buffer being saved does not already end in one.
371If the value of the variable is non-@code{nil}, but not @code{t}, then
372@code{save-buffer} asks the user whether to add a newline each time the
373case arises.
374
375If the value of the variable is @code{nil}, then @code{save-buffer}
376doesn't add newlines at all. @code{nil} is the default value, but a few
377major modes set it to @code{t} in particular buffers.
378@end defopt
379
380@node Reading from Files
381@comment node-name, next, previous, up
382@section Reading from Files
383
384 You can copy a file from the disk and insert it into a buffer
385using the @code{insert-file-contents} function. Don't use the user-level
386command @code{insert-file} in a Lisp program, as that sets the mark.
387
388@defun insert-file-contents filename &optional visit beg end replace
389This function inserts the contents of file @var{filename} into the
390current buffer after point. It returns a list of the absolute file name
391and the length of the data inserted. An error is signaled if
392@var{filename} is not the name of a file that can be read.
393
394To set up saved text properties, @code{insert-file-contents} calls the
395functions in the list @code{after-insert-file-functions}. For more
396information, see @ref{Saving Properties}.
397
398If @var{visit} is non-@code{nil}, this function additionally marks the
399buffer as unmodified and sets up various fields in the buffer so that it
400is visiting the file @var{filename}: these include the buffer's visited
401file name and its last save file modtime. This feature is used by
402@code{find-file-noselect} and you probably should not use it yourself.
403
404If @var{beg} and @var{end} are non-@code{nil}, they should be integers
405specifying the portion of the file to insert. In this case, @var{visit}
406must be @code{nil}. For example,
407
408@example
409(insert-file-contents filename nil 0 500)
410@end example
411
412@noindent
413inserts the first 500 characters of a file.
414
415If the argument @var{replace} is non-@code{nil}, it means to replace the
416contents of the buffer (actually, just the accessible portion) with the
417contents of the file. This is better than simply deleting the buffer
418contents and inserting the whole file, because (1) it preserves some
419marker positions and (2) it puts less data in the undo list.
420@end defun
421
422If you want to pass a file name to another process so that another
423program can read the file, use the function @code{file-local-copy}; see
424@ref{Magic File Names}.
425
426@node Writing to Files
427@comment node-name, next, previous, up
428@section Writing to Files
429
430 You can write the contents of a buffer, or part of a buffer, directly
431to a file on disk using the @code{append-to-file} and
432@code{write-region} functions. Don't use these functions to write to
433files that are being visited; that could cause confusion in the
434mechanisms for visiting.
435
436@deffn Command append-to-file start end filename
437This function appends the contents of the region delimited by
438@var{start} and @var{end} in the current buffer to the end of file
439@var{filename}. If that file does not exist, it is created. This
440function returns @code{nil}.
441
442An error is signaled if @var{filename} specifies a nonwritable file,
443or a nonexistent file in a directory where files cannot be created.
444@end deffn
445
446@deffn Command write-region start end filename &optional append visit
447This function writes the region delimited by @var{start} and @var{end}
448in the current buffer into the file specified by @var{filename}.
449
450@c Emacs 19 feature
451If @var{start} is a string, then @code{write-region} writes or appends
452that string, rather than text from the buffer.
453
454If @var{append} is non-@code{nil}, then the specified text is appended
455to the existing file contents (if any).
456
457If @var{visit} is @code{t}, then Emacs establishes an association
458between the buffer and the file: the buffer is then visiting that file.
459It also sets the last file modification time for the current buffer to
460@var{filename}'s modtime, and marks the buffer as not modified. This
461feature is used by @code{save-buffer}, but you probably should not use
462it yourself.
463
464@c Emacs 19 feature
465If @var{visit} is a string, it specifies the file name to visit. This
466way, you can write the data to one file (@var{filename}) while recording
467the buffer as visiting another file (@var{visit}). The argument
468@var{visit} is used in the echo area message and also for file locking;
469@var{visit} is stored in @code{buffer-file-name}. This feature is used
470to implement @code{file-precious-flag}; don't use it yourself unless you
471really know what you're doing.
472
473To output information about text properties, @code{write-region} calls
474the functions in the list @code{write-region-annotation-functions}. For
475more information, see @ref{Saving Properties}.
476
477Normally, @code{write-region} displays a message @samp{Wrote file
478@var{filename}} in the echo area. If @var{visit} is neither @code{t}
479nor @code{nil} nor a string, then this message is inhibited. This
480feature is useful for programs that use files for internal purposes,
481files which the user does not need to know about.
482@end deffn
483
484@node File Locks
485@section File Locks
486@cindex file locks
487
488 When two users edit the same file at the same time, they are likely to
489interfere with each other. Emacs tries to prevent this situation from
490arising by recording a @dfn{file lock} when a file is being modified.
491Emacs can then detect the first attempt to modify a buffer visiting a
492file that is locked by another Emacs job, and ask the user what to do.
493
494 File locks do not work properly when multiple machines can share
495file systems, such as with NFS. Perhaps a better file locking system
496will be implemented in the future. When file locks do not work, it is
497possible for two users to make changes simultaneously, but Emacs can
498still warn the user who saves second. Also, the detection of
499modification of a buffer visiting a file changed on disk catches some
500cases of simultaneous editing; see @ref{Modification Time}.
501
502@defun file-locked-p filename
503 This function returns @code{nil} if the file @var{filename} is not
504locked by this Emacs process. It returns @code{t} if it is locked by
505this Emacs, and it returns the name of the user who has locked it if it
506is locked by someone else.
507
508@example
509@group
510(file-locked-p "foo")
511 @result{} nil
512@end group
513@end example
514@end defun
515
516@defun lock-buffer &optional filename
517 This function locks the file @var{filename}, if the current buffer is
518modified. The argument @var{filename} defaults to the current buffer's
519visited file. Nothing is done if the current buffer is not visiting a
520file, or is not modified.
521@end defun
522
523@defun unlock-buffer
524This function unlocks the file being visited in the current buffer,
525if the buffer is modified. If the buffer is not modified, then
526the file should not be locked, so this function does nothing. It also
527does nothing if the current buffer is not visiting a file.
528@end defun
529
530@defun ask-user-about-lock file other-user
531This function is called when the user tries to modify @var{file}, but it
532is locked by another user name @var{other-user}. The value it returns
533determines what happens next:
534
535@itemize @bullet
536@item
537A value of @code{t} says to grab the lock on the file. Then
538this user may edit the file and @var{other-user} loses the lock.
539
540@item
541A value of @code{nil} says to ignore the lock and let this
542user edit the file anyway.
543
544@item
545@kindex file-locked
546This function may instead signal a @code{file-locked} error, in which
547case the change that the user was about to make does not take place.
548
549The error message for this error looks like this:
550
551@example
552@error{} File is locked: @var{file} @var{other-user}
553@end example
554
555@noindent
556where @code{file} is the name of the file and @var{other-user} is the
557name of the user who has locked the file.
558@end itemize
559
560 The default definition of this function asks the user to choose what
561to do. If you wish, you can replace the @code{ask-user-about-lock}
562function with your own version that decides in another way. The code
563for its usual definition is in @file{userlock.el}.
564@end defun
565
566@node Information about Files
567@section Information about Files
568
569 The functions described in this section are similar in as much as
570they all operate on strings which are interpreted as file names. All
571have names that begin with the word @samp{file}. These functions all
572return information about actual files or directories, so their
573arguments must all exist as actual files or directories unless
574otherwise noted.
575
576 Most of the file-oriented functions take a single argument,
577@var{filename}, which must be a string. The file name is expanded using
578@code{expand-file-name}, so @file{~} is handled correctly, as are
579relative file names (including @samp{../}). These functions don't
580recognize environment variable substitutions such as @samp{$HOME}.
581@xref{File Name Expansion}.
582
583@menu
584* Testing Accessibility:: Is a given file readable? Writable?
585* Kinds of Files:: Is it a directory? A symbolic link?
586* Truenames:: Eliminating symbolic links from a file name.
587* File Attributes:: How large is it? Any other names? Etc.
588@end menu
589
590@node Testing Accessibility
591@comment node-name, next, previous, up
592@subsection Testing Accessibility
593@cindex accessibility of a file
594@cindex file accessibility
595
596 These functions test for permission to access a file in specific ways.
597
598@defun file-exists-p filename
599This function returns @code{t} if a file named @var{filename} appears
600to exist. This does not mean you can necessarily read the file, only
601that you can find out its attributes. (On Unix, this is true if the
602file exists and you have execute permission on the containing
603directories, regardless of the protection of the file itself.)
604
605If the file does not exist, or if fascist access control policies
606prevent you from finding the attributes of the file, this function
607returns @code{nil}.
608@end defun
609
610@defun file-readable-p filename
611This function returns @code{t} if a file named @var{filename} exists
612and you can read it. It returns @code{nil} otherwise.
613
614@example
615@group
616(file-readable-p "files.texi")
617 @result{} t
618@end group
619@group
620(file-exists-p "/usr/spool/mqueue")
621 @result{} t
622@end group
623@group
624(file-readable-p "/usr/spool/mqueue")
625 @result{} nil
626@end group
627@end example
628@end defun
629
630@c Emacs 19 feature
631@defun file-executable-p filename
632This function returns @code{t} if a file named @var{filename} exists and
633you can execute it. It returns @code{nil} otherwise. If the file is a
634directory, execute permission means you can check the existence and
635attributes of files inside the directory, and open those files if their
636modes permit.
637@end defun
638
639@defun file-writable-p filename
640This function returns @code{t} if the file @var{filename} can be written or
641created by you. It is writable if the file exists and you can write it.
642It is creatable if the file does not exist, but the specified directory
643does exist and you can write in that directory. @code{file-writable-p}
644returns @code{nil} otherwise.
645
646In the third example below, @file{foo} is not writable because the
647parent directory does not exist, even though the user could create such
648a directory.
649
650@example
651@group
652(file-writable-p "~/foo")
653 @result{} t
654@end group
655@group
656(file-writable-p "/foo")
657 @result{} nil
658@end group
659@group
660(file-writable-p "~/no-such-dir/foo")
661 @result{} nil
662@end group
663@end example
664@end defun
665
666@c Emacs 19 feature
667@defun file-accessible-directory-p dirname
668This function returns @code{t} if you have permission to open existing
669files in directory @var{dirname}; otherwise (and if there is no such
670directory), it returns @code{nil}. The value of @var{dirname} may be
671either a directory name or the file name of a directory.
672
673Example: after the following,
674
675@example
676(file-accessible-directory-p "/foo")
677 @result{} nil
678@end example
679
680@noindent
681we can deduce that any attempt to read a file in @file{/foo/} will
682give an error.
683@end defun
684
685@defun file-newer-than-file-p filename1 filename2
686@cindex file age
687@cindex file modification time
688This functions returns @code{t} if the file @var{filename1} is
689newer than file @var{filename2}. If @var{filename1} does not
690exist, it returns @code{nil}. If @var{filename2} does not exist,
691it returns @code{t}.
692
693In the following example, assume that the file @file{aug-19} was
694written on the 19th, and @file{aug-20} was written on the 20th. The
695file @file{no-file} doesn't exist at all.
696
697@example
698@group
699(file-newer-than-file-p "aug-19" "aug-20")
700 @result{} nil
701@end group
702@group
703(file-newer-than-file-p "aug-20" "aug-19")
704 @result{} t
705@end group
706@group
707(file-newer-than-file-p "aug-19" "no-file")
708 @result{} t
709@end group
710@group
711(file-newer-than-file-p "no-file" "aug-19")
712 @result{} nil
713@end group
714@end example
715
716You can use @code{file-attributes} to get a file's last modification
717time as a list of two numbers. @xref{File Attributes}.
718@end defun
719
720@node Kinds of Files
721@comment node-name, next, previous, up
722@subsection Distinguishing Kinds of Files
723
724 This section describes how to distinguish directories and symbolic
725links from ordinary files.
726
727@defun file-symlink-p filename
728@cindex file symbolic links
729If the file @var{filename} is a symbolic link, the @code{file-symlink-p}
730function returns the file name to which it is linked. This may be the
731name of a text file, a directory, or even another symbolic link, or of
732no file at all.
733
734If the file @var{filename} is not a symbolic link (or there is no such file),
735@code{file-symlink-p} returns @code{nil}.
736
737@example
738@group
739(file-symlink-p "foo")
740 @result{} nil
741@end group
742@group
743(file-symlink-p "sym-link")
744 @result{} "foo"
745@end group
746@group
747(file-symlink-p "sym-link2")
748 @result{} "sym-link"
749@end group
750@group
751(file-symlink-p "/bin")
752 @result{} "/pub/bin"
753@end group
754@end example
755
756@c !!! file-symlink-p: should show output of ls -l for comparison
757@end defun
758
759@defun file-directory-p filename
760This function returns @code{t} if @var{filename} is the name of an
761existing directory, @code{nil} otherwise.
762
763@example
764@group
765(file-directory-p "~rms")
766 @result{} t
767@end group
768@group
769(file-directory-p "~rms/lewis/files.texi")
770 @result{} nil
771@end group
772@group
773(file-directory-p "~rms/lewis/no-such-file")
774 @result{} nil
775@end group
776@group
777(file-directory-p "$HOME")
778 @result{} nil
779@end group
780@group
781(file-directory-p
782 (substitute-in-file-name "$HOME"))
783 @result{} t
784@end group
785@end example
786@end defun
787
788@node Truenames
789@subsection Truenames
790@cindex truename (of file)
791
792@c Emacs 19 features
793 The @dfn{truename} of a file is the name that you get by following
794symbolic links until none remain, then expanding to get rid of @samp{.}
795and @samp{..} as components. Strictly speaking, a file need not have a
796unique truename; the number of distinct truenames a file has is equal to
797the number of hard links to the file. However, truenames are useful
798because they eliminate symbolic links as a cause of name variation.
799
800@defun file-truename filename
801The function @code{file-truename} returns the true name of the file
802@var{filename}. This is the name that you get by following symbolic
803links until none remain. The argument must be an absolute file name.
804@end defun
805
806 @xref{Buffer File Name}, for related information.
807
808@node File Attributes
809@comment node-name, next, previous, up
810@subsection Other Information about Files
811
812 This section describes the functions for getting detailed information
813about a file, other than its contents. This information includes the
814mode bits that control access permission, the owner and group numbers,
815the number of names, the inode number, the size, and the times of access
816and modification.
817
818@defun file-modes filename
819@cindex permission
820@cindex file attributes
821This function returns the mode bits of @var{filename}, as an integer.
822The mode bits are also called the file permissions, and they specify
823access control in the usual Unix fashion. If the low-order bit is 1,
824then the file is executable by all users, if the second lowest-order bit
825is 1, then the file is writable by all users, etc.
826
827The highest value returnable is 4095 (7777 octal), meaning that
828everyone has read, write, and execute permission, that the @sc{suid} bit
829is set for both others and group, and that the sticky bit is set.
830
831@example
832@group
833(file-modes "~/junk/diffs")
834 @result{} 492 ; @r{Decimal integer.}
835@end group
836@group
837(format "%o" 492)
838 @result{} "754" ; @r{Convert to octal.}
839@end group
840
841@group
842(set-file-modes "~/junk/diffs" 438)
843 @result{} nil
844@end group
845
846@group
847(format "%o" 438)
848 @result{} "666" ; @r{Convert to octal.}
849@end group
850
851@group
852% ls -l diffs
853 -rw-rw-rw- 1 lewis 0 3063 Oct 30 16:00 diffs
854@end group
855@end example
856@end defun
857
858@defun file-nlinks filename
859This functions returns the number of names (i.e., hard links) that
860file @var{filename} has. If the file does not exist, then this function
861returns @code{nil}. Note that symbolic links have no effect on this
862function, because they are not considered to be names of the files they
863link to.
864
865@example
866@group
867% ls -l foo*
868-rw-rw-rw- 2 rms 4 Aug 19 01:27 foo
869-rw-rw-rw- 2 rms 4 Aug 19 01:27 foo1
870@end group
871
872@group
873(file-nlinks "foo")
874 @result{} 2
875@end group
876@group
877(file-nlinks "doesnt-exist")
878 @result{} nil
879@end group
880@end example
881@end defun
882
883@defun file-attributes filename
884This function returns a list of attributes of file @var{filename}. If
885the specified file cannot be opened, it returns @code{nil}.
886
887The elements of the list, in order, are:
888
889@enumerate 0
890@item
891@code{t} for a directory, a string for a symbolic link (the name
892linked to), or @code{nil} for a text file.
893
894@c Wordy so as to prevent an overfull hbox. --rjc 15mar92
895@item
896The number of names the file has. Alternate names, also known as hard
897links, can be created by using the @code{add-name-to-file} function
898(@pxref{Changing File Attributes}).
899
900@item
901The file's @sc{uid}.
902
903@item
904The file's @sc{gid}.
905
906@item
907The time of last access, as a list of two integers.
908The first integer has the high-order 16 bits of time,
909the second has the low 16 bits. (This is similar to the
910value of @code{current-time}; see @ref{Time of Day}.)
911
912@item
913The time of last modification as a list of two integers (as above).
914
915@item
916The time of last status change as a list of two integers (as above).
917
918@item
919The size of the file in bytes.
920
921@item
922The file's modes, as a string of ten letters or dashes
923as in @samp{ls -l}.
924
925@item
926@code{t} if the file's @sc{gid} would change if file were
927deleted and recreated; @code{nil} otherwise.
928
929@item
930The file's inode number.
931
932@item
933The file system number of the file system that the file is in. This
934element together with the file's inode number, give enough information
935to distinguish any two files on the system---no two files can have the
936same values for both of these numbers.
937@end enumerate
938
939For example, here are the file attributes for @file{files.texi}:
940
941@example
942@group
943(file-attributes "files.texi")
944 @result{} (nil
945 1
946 2235
947 75
948 (8489 20284)
949 (8489 20284)
950 (8489 20285)
951 14906
952 "-rw-rw-rw-"
953 nil
954 129500
955 -32252)
956@end group
957@end example
958
959@noindent
960and here is how the result is interpreted:
961
962@table @code
963@item nil
964is neither a directory nor a symbolic link.
965
966@item 1
967has only one name (the name @file{files.texi} in the current default
968directory).
969
970@item 2235
971is owned by the user with @sc{uid} 2235.
972
973@item 75
974is in the group with @sc{gid} 75.
975
976@item (8489 20284)
977was last accessed on Aug 19 00:09. Unfortunately, you cannot convert
978this number into a time string in Emacs.
979
980@item (8489 20284)
981was last modified on Aug 19 00:09.
982
983@item (8489 20285)
984last had its inode changed on Aug 19 00:09.
985
986@item 14906
987is 14906 characters long.
988
989@item "-rw-rw-rw-"
990has a mode of read and write access for the owner, group, and world.
991
992@item nil
993would retain the same @sc{gid} if it were recreated.
994
995@item 129500
996has an inode number of 129500.
997@item -32252
998is on file system number -32252.
999@end table
1000@end defun
1001
1002@node Changing File Attributes
1003@section Changing File Names and Attributes
1004@cindex renaming files
1005@cindex copying files
1006@cindex deleting files
1007@cindex linking files
1008@cindex setting modes of files
1009
1010 The functions in this section rename, copy, delete, link, and set the
1011modes of files.
1012
1013 In the functions that have an argument @var{newname}, if a file by the
1014name of @var{newname} already exists, the actions taken depend on the
1015value of the argument @var{ok-if-already-exists}:
1016
1017@itemize @bullet
1018@item
1019Signal a @code{file-already-exists} error if
1020@var{ok-if-already-exists} is @code{nil}.
1021
1022@item
1023Request confirmation if @var{ok-if-already-exists} is a number.
1024
1025@item
1026Replace the old file without confirmation if @var{ok-if-already-exists}
1027is any other value.
1028@end itemize
1029
1030@defun add-name-to-file oldname newname &optional ok-if-already-exists
1031@cindex file with multiple names
1032@cindex file hard link
1033This function gives the file named @var{oldname} the additional name
1034@var{newname}. This means that @var{newname} becomes a new ``hard
1035link'' to @var{oldname}.
1036
1037In the first part of the following example, we list two files,
1038@file{foo} and @file{foo3}.
1039
1040@example
1041@group
1042% ls -l fo*
1043-rw-rw-rw- 1 rms 29 Aug 18 20:32 foo
1044-rw-rw-rw- 1 rms 24 Aug 18 20:31 foo3
1045@end group
1046@end example
1047
1048Then we evaluate the form @code{(add-name-to-file "~/lewis/foo"
1049"~/lewis/foo2")}. Again we list the files. This shows two names,
1050@file{foo} and @file{foo2}.
1051
1052@example
1053@group
1054(add-name-to-file "~/lewis/foo1" "~/lewis/foo2")
1055 @result{} nil
1056@end group
1057
1058@group
1059% ls -l fo*
1060-rw-rw-rw- 2 rms 29 Aug 18 20:32 foo
1061-rw-rw-rw- 2 rms 29 Aug 18 20:32 foo2
1062-rw-rw-rw- 1 rms 24 Aug 18 20:31 foo3
1063@end group
1064@end example
1065
1066@c !!! Check whether this set of examples is consistent. --rjc 15mar92
1067 Finally, we evaluate the following:
1068
1069@example
1070(add-name-to-file "~/lewis/foo" "~/lewis/foo3" t)
1071@end example
1072
1073@noindent
1074and list the files again. Now there are three names
1075for one file: @file{foo}, @file{foo2}, and @file{foo3}. The old
1076contents of @file{foo3} are lost.
1077
1078@example
1079@group
1080(add-name-to-file "~/lewis/foo1" "~/lewis/foo3")
1081 @result{} nil
1082@end group
1083
1084@group
1085% ls -l fo*
1086-rw-rw-rw- 3 rms 29 Aug 18 20:32 foo
1087-rw-rw-rw- 3 rms 29 Aug 18 20:32 foo2
1088-rw-rw-rw- 3 rms 29 Aug 18 20:32 foo3
1089@end group
1090@end example
1091
1092 This function is meaningless on VMS, where multiple names for one file
1093are not allowed.
1094
1095 See also @code{file-nlinks} in @ref{File Attributes}.
1096@end defun
1097
1098@deffn Command rename-file filename newname &optional ok-if-already-exists
1099This command renames the file @var{filename} as @var{newname}.
1100
1101If @var{filename} has additional names aside from @var{filename}, it
1102continues to have those names. In fact, adding the name @var{newname}
1103with @code{add-name-to-file} and then deleting @var{filename} has the
1104same effect as renaming, aside from momentary intermediate states.
1105
1106In an interactive call, this function prompts for @var{filename} and
1107@var{newname} in the minibuffer; also, it requests confirmation if
1108@var{newname} already exists.
1109@end deffn
1110
1111@deffn Command copy-file oldname newname &optional ok-if-exists time
1112This command copies the file @var{oldname} to @var{newname}. An
1113error is signaled if @var{oldname} does not exist.
1114
1115If @var{time} is non-@code{nil}, then this functions gives the new
1116file the same last-modified time that the old one has. (This works on
1117only some operating systems.)
1118
1119In an interactive call, this function prompts for @var{filename} and
1120@var{newname} in the minibuffer; also, it requests confirmation if
1121@var{newname} already exists.
1122@end deffn
1123
1124@deffn Command delete-file filename
1125@pindex rm
1126This command deletes the file @var{filename}, like the shell command
1127@samp{rm @var{filename}}. If the file has multiple names, it continues
1128to exist under the other names.
1129
1130A suitable kind of @code{file-error} error is signaled if the file
1131does not exist, or is not deletable. (On Unix, a file is deletable if
1132its directory is writable.)
1133
1134See also @code{delete-directory} in @ref{Create/Delete Dirs}.
1135@end deffn
1136
1137@deffn Command make-symbolic-link filename newname &optional ok-if-exists
1138@pindex ln
1139@kindex file-already-exists
1140This command makes a symbolic link to @var{filename}, named
1141@var{newname}. This is like the shell command @samp{ln -s
1142@var{filename} @var{newname}}.
1143
1144In an interactive call, @var{filename} and @var{newname} are read in the
1145minibuffer; it requests confirmation if the file @var{newname} already
1146exists.
1147@end deffn
1148
1149@defun define-logical-name varname string
1150This function defines the logical name @var{name} to have the value
1151@var{string}. It is available only on VMS.
1152@end defun
1153
1154@defun set-file-modes filename mode
1155This function sets mode bits of @var{filename} to @var{mode} (which must
1156be an integer). Only the 12 low bits of @var{mode} are used.
1157@end defun
1158
1159@c Emacs 19 feature
1160@defun set-default-file-modes mode
1161This function sets the default file protection for new files created by
1162Emacs and its subprocesses. Every file created with Emacs initially has
1163this protection. On Unix, the default protection is the bitwise
1164complement of the ``umask'' value.
1165
1166The argument @var{mode} must be an integer. Only the 9 low bits of
1167@var{mode} are used.
1168
1169Saving a modified version of an existing file does not count as creating
1170the file; it does not change the file's mode, and does not use the
1171default file protection.
1172@end defun
1173
1174@defun default-file-modes
1175This function returns the current default protection value.
1176@end defun
1177
1178@node File Names
1179@section File Names
1180@cindex file names
1181
1182 Files are generally referred to by their names, in Emacs as elsewhere.
1183File names in Emacs are represented as strings. The functions that
1184operate on a file all expect a file name argument.
1185
1186 In addition to operating on files themselves, Emacs Lisp programs
1187often need to operate on the names; i.e., to take them apart and to use
1188part of a name to construct related file names. This section describes
1189how to manipulate file names.
1190
1191 The functions in this section do not actually access files, so they
1192can operate on file names that do not refer to an existing file or
1193directory.
1194
1195 On VMS, all these functions understand both VMS file name syntax and
1196Unix syntax. This is so that all the standard Lisp libraries can
1197specify file names in Unix syntax and work properly on VMS without
1198change.
1199
1200@menu
1201* File Name Components:: The directory part of a file name, and the rest.
1202* Directory Names:: A directory's name as a directory
1203 is different from its name as a file.
1204* Relative File Names:: Some file names are relative to a current directory.
1205* File Name Expansion:: Converting relative file names to absolute ones.
1206* Unique File Names:: Generating names for temporary files.
1207* File Name Completion:: Finding the completions for a given file name.
1208@end menu
1209
1210@node File Name Components
1211@subsection File Name Components
1212@cindex directory part (of file name)
1213@cindex nondirectory part (of file name)
1214@cindex version number (in file name)
1215
1216 The operating system groups files into directories. To specify a
1217file, you must specify the directory, and the file's name in that
1218directory. Therefore, a file name in Emacs is considered to have two
1219main parts: the @dfn{directory name} part, and the @dfn{nondirectory}
1220part (or @dfn{file name within the directory}). Either part may be
1221empty. Concatenating these two parts reproduces the original file name.
1222
1223 On Unix, the directory part is everything up to and including the last
1224slash; the nondirectory part is the rest. The rules in VMS syntax are
1225complicated.
1226
1227 For some purposes, the nondirectory part is further subdivided into
1228the name proper and the @dfn{version number}. On Unix, only backup
1229files have version numbers in their names; on VMS, every file has a
1230version number, but most of the time the file name actually used in
1231Emacs omits the version number. Version numbers are found mostly in
1232directory lists.
1233
1234@defun file-name-directory filename
1235 This function returns the directory part of @var{filename} (or
1236@code{nil} if @var{filename} does not include a directory part). On
1237Unix, the function returns a string ending in a slash. On VMS, it
1238returns a string ending in one of the three characters @samp{:},
1239@samp{]}, or @samp{>}.
1240
1241@example
1242@group
1243(file-name-directory "lewis/foo") ; @r{Unix example}
1244 @result{} "lewis/"
1245@end group
1246@group
1247(file-name-directory "foo") ; @r{Unix example}
1248 @result{} nil
1249@end group
1250@group
1251(file-name-directory "[X]FOO.TMP") ; @r{VMS example}
1252 @result{} "[X]"
1253@end group
1254@end example
1255@end defun
1256
1257@defun file-name-nondirectory filename
1258 This function returns the nondirectory part of @var{filename}.
1259
1260@example
1261@group
1262(file-name-nondirectory "lewis/foo")
1263 @result{} "foo"
1264@end group
1265@group
1266(file-name-nondirectory "foo")
1267 @result{} "foo"
1268@end group
1269@group
1270;; @r{The following example is accurate only on VMS.}
1271(file-name-nondirectory "[X]FOO.TMP")
1272 @result{} "FOO.TMP"
1273@end group
1274@end example
1275@end defun
1276
1277@defun file-name-sans-versions filename
1278 This function returns @var{filename} without any file version numbers,
1279backup version numbers, or trailing tildes.
1280
1281@example
1282@group
1283(file-name-sans-versions "~rms/foo.~1~")
1284 @result{} "~rms/foo"
1285@end group
1286@group
1287(file-name-sans-versions "~rms/foo~")
1288 @result{} "~rms/foo"
1289@end group
1290@group
1291(file-name-sans-versions "~rms/foo")
1292 @result{} "~rms/foo"
1293@end group
1294@group
1295;; @r{The following example applies to VMS only.}
1296(file-name-sans-versions "foo;23")
1297 @result{} "foo"
1298@end group
1299@end example
1300@end defun
1301
1302@node Directory Names
1303@comment node-name, next, previous, up
1304@subsection Directory Names
1305@cindex directory name
1306@cindex file name of directory
1307
1308 A @dfn{directory name} is the name of a directory. A directory is a
1309kind of file, and it has a file name, which is related to the directory
1310name but not identical to it. (This is not quite the same as the usual
1311Unix terminology.) These two different names for the same entity are
1312related by a syntactic transformation. On Unix, this is simple: a
1313directory name ends in a slash, whereas the directory's name as a file
1314lacks that slash. On VMS, the relationship is more complicated.
1315
1316 The difference between a directory name and its name as a file is
1317subtle but crucial. When an Emacs variable or function argument is
1318described as being a directory name, a file name of a directory is not
1319acceptable.
1320
1321 These two functions convert between directory names and file names.
1322They do nothing special with environment variable substitutions such as
1323@samp{$HOME}, and the constructs @samp{~}, and @samp{..}.
1324
1325@defun file-name-as-directory filename
1326This function returns a string representing @var{filename} in a form
1327that the operating system will interpret as the name of a directory. In
1328Unix, this means appending a slash to the string. On VMS, the function
1329converts a string of the form @file{[X]Y.DIR.1} to the form
1330@file{[X.Y]}.
1331
1332@example
1333@group
1334(file-name-as-directory "~rms/lewis")
1335 @result{} "~rms/lewis/"
1336@end group
1337@end example
1338@end defun
1339
1340@defun directory-file-name dirname
1341This function returns a string representing @var{dirname} in a form
1342that the operating system will interpret as the name of a file. On
1343Unix, this means removing a final slash from the string. On VMS, the
1344function converts a string of the form @file{[X.Y]} to
1345@file{[X]Y.DIR.1}.
1346
1347@example
1348@group
1349(directory-file-name "~lewis/")
1350 @result{} "~lewis"
1351@end group
1352@end example
1353@end defun
1354
1355@cindex directory name abbreviation
1356 Directory name abbreviations are useful for directories that are
1357normally accessed through symbolic links. Sometimes the users recognize
1358primarily the link's name as ``the name'' of the directory, and find it
1359annoying to see the directory's ``real'' name. If you define the link
1360name as an abbreviation for the ``real'' name, Emacs shows users the
1361abbreviation instead.
1362
1363@defvar directory-abbrev-alist
1364The variable @code{directory-abbrev-alist} contains an alist of
1365abbreviations to use for file directories. Each element has the form
1366@code{(@var{from} . @var{to})}, and says to replace @var{from} with
1367@var{to} when it appears in a directory name. The @var{from} string is
1368actually a regular expression; it should always start with @samp{^}.
1369The function @code{abbreviate-file-name} performs these substitutions.
1370
1371You can set this variable in @file{site-init.el} to describe the
1372abbreviations appropriate for your site.
1373
1374Here's an example, from a system on which file system @file{/home/fsf}
1375and so on are normally accessed through symbolic links named @file{/fsf}
1376and so on.
1377
1378@example
1379(("^/home/fsf" . "/fsf")
1380 ("^/home/gp" . "/gp")
1381 ("^/home/gd" . "/gd"))
1382@end example
1383@end defvar
1384
1385 To convert a directory name to its abbreviation, use this
1386function:
1387
1388@defun abbreviate-file-name dirname
1389This function applies abbreviations from @code{directory-abbrev-alist}
1390to its argument, and substitutes @samp{~} for the user's home
1391directory.
1392@end defun
1393
1394@node Relative File Names
1395@subsection Absolute and Relative File Names
1396@cindex absolute file name
1397@cindex relative file name
1398
1399 All the directories in the file system form a tree starting at the
1400root directory. A file name can specify all the directory names
1401starting from the root of the tree; then it is called an @dfn{absolute}
1402file name. Or it can specify the position of the file in the tree
1403relative to a default directory; then it is called a @dfn{relative}
1404file name. On Unix, an absolute file name starts with a slash or a
1405tilde (@samp{~}), and a relative one does not. The rules on VMS are
1406complicated.
1407
1408@defun file-name-absolute-p filename
1409This function returns @code{t} if file @var{filename} is an absolute
1410file name, @code{nil} otherwise. On VMS, this function understands both
1411Unix syntax and VMS syntax.
1412
1413@example
1414@group
1415(file-name-absolute-p "~rms/foo")
1416 @result{} t
1417@end group
1418@group
1419(file-name-absolute-p "rms/foo")
1420 @result{} nil
1421@end group
1422@group
1423(file-name-absolute-p "/user/rms/foo")
1424 @result{} t
1425@end group
1426@end example
1427@end defun
1428
1429@node File Name Expansion
1430@subsection Functions that Expand Filenames
1431@cindex expansion of file names
1432
1433 @dfn{Expansion} of a file name means converting a relative file name
1434to an absolute one. Since this is done relative to a default directory,
1435you must specify the default directory name as well as the file name to
1436be expanded. Expansion also simplifies file names by eliminating
1437redundancies such as @file{./} and @file{@var{name}/../}.
1438
1439@defun expand-file-name filename &optional directory
1440This function converts @var{filename} to an absolute file name. If
1441@var{directory} is supplied, it is the directory to start with if
1442@var{filename} is relative. (The value of @var{directory} should itself
1443be an absolute directory name; it may start with @samp{~}.)
1444Otherwise, the current buffer's value of @code{default-directory} is
1445used. For example:
1446
1447@example
1448@group
1449(expand-file-name "foo")
1450 @result{} "/xcssun/users/rms/lewis/foo"
1451@end group
1452@group
1453(expand-file-name "../foo")
1454 @result{} "/xcssun/users/rms/foo"
1455@end group
1456@group
1457(expand-file-name "foo" "/usr/spool/")
1458 @result{} "/usr/spool/foo"
1459@end group
1460@group
1461(expand-file-name "$HOME/foo")
1462 @result{} "/xcssun/users/rms/lewis/$HOME/foo"
1463@end group
1464@end example
1465
1466Filenames containing @samp{.} or @samp{..} are simplified to their
1467canonical form:
1468
1469@example
1470@group
1471(expand-file-name "bar/../foo")
1472 @result{} "/xcssun/users/rms/lewis/foo"
1473@end group
1474@end example
1475
1476@samp{~/} is expanded into the user's home directory. A @samp{/} or
1477@samp{~} following a @samp{/} is taken to be the start of an absolute
1478file name that overrides what precedes it, so everything before that
1479@samp{/} or @samp{~} is deleted. For example:
1480
1481@example
1482@group
1483(expand-file-name
1484 "/a1/gnu//usr/local/lib/emacs/etc/MACHINES")
1485 @result{} "/usr/local/lib/emacs/etc/MACHINES"
1486@end group
1487@group
1488(expand-file-name "/a1/gnu/~/foo")
1489 @result{} "/xcssun/users/rms/foo"
1490@end group
1491@end example
1492
1493@noindent
1494In both cases, @file{/a1/gnu/} is discarded because an absolute file
1495name follows it.
1496
1497Note that @code{expand-file-name} does @emph{not} expand environment
1498variables; only @code{substitute-in-file-name} does that.
1499@end defun
1500
1501@c Emacs 19 feature
1502@defun file-relative-name filename directory
1503This function does the inverse of expansion---it tries to return a
1504relative name which is equivalent to @var{filename} when interpreted
1505relative to @var{directory}. (If such a relative name would be longer
1506than the absolute name, it returns the absolute name instead.)
1507
1508@example
1509(file-relative-name "/foo/bar" "/foo/")
1510 @result{} "bar")
1511(file-relative-name "/foo/bar" "/hack/")
1512 @result{} "/foo/bar")
1513@end example
1514@end defun
1515
1516@defvar default-directory
1517The value of this buffer-local variable is the default directory for the
1518current buffer. It should be an absolute directory name; it may start
1519with @samp{~}. This variable is local in every buffer.
1520
1521@code{expand-file-name} uses the default directory when its second
1522argument is @code{nil}.
1523
1524On Unix systems, the value is always a string ending with a slash.
1525
1526@example
1527@group
1528default-directory
1529 @result{} "/user/lewis/manual/"
1530@end group
1531@end example
1532@end defvar
1533
1534@defun substitute-in-file-name filename
1535This function replaces environment variables references in
1536@var{filename} with the environment variable values. Following standard
1537Unix shell syntax, @samp{$} is the prefix to substitute an environment
1538variable value.
1539
1540The environment variable name is the series of alphanumeric characters
1541(including underscores) that follow the @samp{$}. If the character following
1542the @samp{$} is a @samp{@{}, then the variable name is everything up to the
1543matching @samp{@}}.
1544
1545@c Wordy to avoid overfull hbox. --rjc 15mar92
1546Here we assume that the environment variable @code{HOME}, which holds
1547the user's home directory name, has value @samp{/xcssun/users/rms}.
1548
1549@example
1550@group
1551(substitute-in-file-name "$HOME/foo")
1552 @result{} "/xcssun/users/rms/foo"
1553@end group
1554@end example
1555
1556If a @samp{~} or a @samp{/} appears following a @samp{/}, after
1557substitution, everything before the following @samp{/} is discarded:
1558
1559@example
1560@group
1561(substitute-in-file-name "bar/~/foo")
1562 @result{} "~/foo"
1563@end group
1564@group
1565(substitute-in-file-name "/usr/local/$HOME/foo")
1566 @result{} "/xcssun/users/rms/foo"
1567@end group
1568@end example
1569
1570On VMS, @samp{$} substitution is not done, so this function does nothing
1571on VMS except discard superfluous initial components as shown above.
1572@end defun
1573
1574@node Unique File Names
1575@subsection Generating Unique File Names
1576
1577 Some programs need to write temporary files. Here is the usual way to
1578construct a name for such a file:
1579
1580@example
1581(make-temp-name (concat "/tmp/" @var{name-of-application}))
1582@end example
1583
1584@noindent
1585Here we use the directory @file{/tmp/} because that is the standard
1586place on Unix for temporary files. The job of @code{make-temp-name} is
1587to prevent two different users or two different jobs from trying to use
1588the same name.
1589
1590@defun make-temp-name string
1591This function generates string that can be used as a unique name. The
1592name starts with the prefix @var{string}, and ends with a number that
1593is different in each Emacs job.
1594
1595@example
1596@group
1597(make-temp-name "/tmp/foo")
1598 @result{} "/tmp/foo021304"
1599@end group
1600@end example
1601
1602To prevent conflicts among different libraries running in the same
1603Emacs, each Lisp program that uses @code{make-temp-name} should have its
1604own @var{string}. The number added to the end of the name distinguishes
1605between the same application running in different Emacs jobs.
1606@end defun
1607
1608@node File Name Completion
1609@subsection File Name Completion
1610@cindex file name completion subroutines
1611@cindex completion, file name
1612
1613 This section describes low-level subroutines for completing a file
1614name. For other completion functions, see @ref{Completion}.
1615
1616@defun file-name-all-completions partial-filename directory
1617This function returns a list of all possible completions for a file
1618whose name starts with @var{partial-filename} in directory
1619@var{directory}. The order of the completions is the order of the files
1620in the directory, which is unpredictable and conveys no useful
1621information.
1622
1623The argument @var{partial-filename} must be a file name containing no
1624directory part and no slash. The current buffer's default directory is
1625prepended to @var{directory}, if @var{directory} is not absolute.
1626
1627In the following example, suppose that the current default directory,
1628@file{~rms/lewis}, has five files whose names begin with @samp{f}:
1629@file{foo}, @file{file~}, @file{file.c}, @file{file.c.~1~}, and
1630@file{file.c.~2~}.@refill
1631
1632@example
1633@group
1634(file-name-all-completions "f" "")
1635 @result{} ("foo" "file~" "file.c.~2~"
1636 "file.c.~1~" "file.c")
1637@end group
1638
1639@group
1640(file-name-all-completions "fo" "")
1641 @result{} ("foo")
1642@end group
1643@end example
1644@end defun
1645
1646@defun file-name-completion filename directory
1647This function completes the file name @var{filename} in directory
1648@var{directory}. It returns the longest prefix common to all file names
1649in directory @var{directory} that start with @var{filename}.
1650
1651If only one match exists and @var{filename} matches it exactly, the
1652function returns @code{t}. The function returns @code{nil} if directory
1653@var{directory} contains no name starting with @var{filename}.
1654
1655In the following example, suppose that the current default directory
1656has five files whose names begin with @samp{f}: @file{foo},
1657@file{file~}, @file{file.c}, @file{file.c.~1~}, and
1658@file{file.c.~2~}.@refill
1659
1660@example
1661@group
1662(file-name-completion "fi" "")
1663 @result{} "file"
1664@end group
1665
1666@group
1667(file-name-completion "file.c.~1" "")
1668 @result{} "file.c.~1~"
1669@end group
1670
1671@group
1672(file-name-completion "file.c.~1~" "")
1673 @result{} t
1674@end group
1675
1676@group
1677(file-name-completion "file.c.~3" "")
1678 @result{} nil
1679@end group
1680@end example
1681@end defun
1682
1683@defopt completion-ignored-extensions
1684@code{file-name-completion} usually ignores file names that end in any
1685string in this list. It does not ignore them when all the possible
1686completions end in one of these suffixes or when a buffer showing all
1687possible completions is displayed.@refill
1688
1689A typical value might look like this:
1690
1691@example
1692@group
1693completion-ignored-extensions
1694 @result{} (".o" ".elc" "~" ".dvi")
1695@end group
1696@end example
1697@end defopt
1698
1699@node Contents of Directories
1700@section Contents of Directories
1701@cindex directory-oriented functions
1702@cindex file names in directory
1703
1704 A directory is a kind of file that contains other files entered under
1705various names. Directories are a feature of the file system.
1706
1707 Emacs can list the names of the files in a directory as a Lisp list,
1708or display the names in a buffer using the @code{ls} shell command. In
1709the latter case, it can optionally display information about each file,
1710depending on the options passed to the @code{ls} command.
1711
1712@defun directory-files directory &optional full-name match-regexp nosort
1713This function returns a list of the names of the files in the directory
1714@var{directory}. By default, the list is in alphabetical order.
1715
1716If @var{full-name} is non-@code{nil}, the function returns the files'
1717absolute file names. Otherwise, it returns the names relative to
1718the specified directory.
1719
1720If @var{match-regexp} is non-@code{nil}, this function returns only
1721those file names that contain a match for that regular expression---the
1722other file names are excluded from the list.
1723
1724@c Emacs 19 feature
1725If @var{nosort} is non-@code{nil}, @code{directory-files} does not sort
1726the list, so you get the file names in no particular order. Use this if
1727you want the utmost possible speed and don't care what order the files
1728are processed in. If the order of processing is visible to the user,
1729then the user will probably be happier if you do sort the names.
1730
1731@example
1732@group
1733(directory-files "~lewis")
1734 @result{} ("#foo#" "#foo.el#" "." ".."
1735 "dired-mods.el" "files.texi"
1736 "files.texi.~1~")
1737@end group
1738@end example
1739
1740An error is signaled if @var{directory} is not the name of a directory
1741that can be read.
1742@end defun
1743
1744@defun file-name-all-versions file dirname
1745This function returns a list of all versions of the file named
1746@var{file} in directory @var{dirname}.
1747@end defun
1748
1749@defun insert-directory file switches &optional wildcard full-directory-p
1750This function inserts a directory listing for directory @var{dir},
1751formatted with @code{ls} according to @var{switches}. It leaves point
1752after the inserted text.
1753
1754The argument @var{dir} may be either a directory name or a file
1755specification including wildcard characters. If @var{wildcard} is
1756non-@code{nil}, that means treat @var{file} as a file specification with
1757wildcards.
1758
1759If @var{full-directory-p} is non-@code{nil}, that means @var{file} is a
1760directory and switches do not contain @samp{d}, so that a full listing
1761is expected.
1762
1763This function works by running a directory listing program whose name is
1764in the variable @code{insert-directory-program}. If @var{wildcard} is
1765non-@code{nil}, it also runs the shell specified by
1766@code{shell-file-name}, to expand the wildcards.
1767@end defun
1768
1769@defvar insert-directory-program
1770This variable's value is the program to run to generate a directory listing
1771for the function @code{insert-directory}.
1772@end defvar
1773
1774@node Create/Delete Dirs
1775@section Creating and Deleting Directories
1776@c Emacs 19 features
1777
1778@defun make-directory dirname
1779This function creates a directory named @var{dirname}.
1780@end defun
1781
1782@defun delete-directory dirname
1783This function deletes the directory named @var{dirname}. The function
1784@code{delete-file} does not work for files that are directories; you
1785must use @code{delete-directory} in that case.
1786@end defun
1787
1788@node Magic File Names
1789@section Making Certain File Names ``Magic''
1790@cindex magic file names
1791
1792@c Emacs 19 feature
1793You can implement special handling for certain file names. This is
1794called making those names @dfn{magic}. You must supply a regular
1795expression to define the class of names (all those which match the
1796regular expression), plus a handler that implements all the primitive
1797Emacs file operations for file names that do match.
1798
1799The value of @code{file-name-handler-alist} is a list of handlers,
1800together with regular expressions that determine when to apply each
1801handler. Each element has this form:
1802
1803@example
1804(@var{regexp} . @var{handler})
1805@end example
1806
1807@noindent
1808All the Emacs primitives for file access and file name transformation
1809check the given file name against @code{file-name-handler-alist}. If
1810the file name matches @var{regexp}, the primitives handle that file by
1811calling @var{handler}.
1812
1813The first argument given to @var{handler} is the name of the primitive;
1814the remaining arguments are the arguments that were passed to that
1815operation. (The first of these arguments is typically the file name
1816itself.) For example, if you do this:
1817
1818@example
1819(file-exists-p @var{filename})
1820@end example
1821
1822@noindent
1823and @var{filename} has handler @var{handler}, then @var{handler} is
1824called like this:
1825
1826@example
1827(funcall @var{handler} 'file-exists-p @var{filename})
1828@end example
1829
1830Here are the operations that you can handle for a magic file name:
1831
1832@noindent
1833@code{add-name-to-file}, @code{copy-file}, @code{delete-directory},
1834@code{delete-file},@*
1835@code{directory-file-name},
1836@code{diff-latest-backup-file}, @code{directory-files},
1837@code{dired-compress-file}, @code{dired-uncache},
1838@code{expand-file-name},@*
1839@code{file-accessible-directory-p},
1840@code{file-attributes}, @code{file-directory-p},
1841@code{file-executable-p}, @code{file-exists-p}, @code{file-local-copy},
1842@code{file-modes}, @code{file-name-all-completions},
1843@code{file-name-as-directory}, @code{file-name-completion},
1844@code{file-name-directory}, @code{file-name-nondirectory},
1845@code{file-name-sans-versions}, @code{file-newer-than-file-p},
1846@code{file-readable-p}, @code{file-symlink-p}, @code{file-truename},
1847@code{file-writable-p}, @code{insert-directory},
1848@code{insert-file-contents}, @code{load}, @code{make-directory},
1849@code{make-symbolic-link}, @code{rename-file}, @code{set-file-modes},
1850@code{set-visited-file-modtime}, @code{unhandled-file-name-directory},
1851@code{verify-visited-file-modtime}, @code{write-region}.
1852
1853The handler function must handle all of the above operations, and
1854possibly others to be added in the future. Therefore, it should always
1855reinvoke the ordinary Lisp primitive when it receives an operation it
1856does not recognize. Here's one way to do this:
1857
1858@example
1859(defun my-file-handler (operation &rest args)
1860 ;; @r{First check for the specific operations}
1861 ;; @r{that we have special handling for.}
1862 (cond ((eq operation 'insert-file-contents) @dots{})
1863 ((eq operation 'write-region) @dots{})
1864 @dots{}
1865 ;; @r{Handle any operation we don't know about.}
1866 (t (let (file-name-handler-alist)
1867 (apply operation args)))))
1868@end example
1869
1870@defun find-file-name-handler file
1871This function returns the handler function for file name @var{file}, or
1872@code{nil} if there is none.
1873@end defun
1874
1875@defun file-local-copy filename
1876This function copies file @var{filename} to the local site, if it isn't
1877there already. If @var{filename} specifies a ``magic'' file name which
1878programs outside Emacs cannot directly read or write, this copies the
1879contents to an ordinary file and returns that file's name.
1880
1881If @var{filename} is an ordinary file name, not magic, then this function
1882does nothing and returns @code{nil}.
1883@end defun
1884
1885@defun unhandled-file-name-directory filename
1886This function returns the name of a directory that is not magic.
1887It uses the directory part of @var{filename} if that is not magic.
1888Otherwise, it asks the handler what to do.
1889
1890This is useful for running a subprocess; every subprocess must have a
1891non-magic directory to serve as its current directory, and this function
1892is a good way to come up with one.
1893@end defun
diff --git a/lispref/minibuf.texi b/lispref/minibuf.texi
new file mode 100644
index 00000000000..51fd3ec4dce
--- /dev/null
+++ b/lispref/minibuf.texi
@@ -0,0 +1,1404 @@
1@c -*-texinfo-*-
2@c This is part of the GNU Emacs Lisp Reference Manual.
3@c Copyright (C) 1990, 1991, 1992, 1993, 1994 Free Software Foundation, Inc.
4@c See the file elisp.texi for copying conditions.
5@setfilename ../info/minibuf
6@node Minibuffers, Command Loop, Streams, Top
7@chapter Minibuffers
8@cindex arguments, reading
9@cindex complex arguments
10@cindex minibuffer
11
12 A @dfn{minibuffer} is a special buffer that Emacs commands use to read
13arguments more complicated than the single numeric prefix argument.
14These arguments include file names, buffer names, and command names (as
15in @kbd{M-x}). The minibuffer is displayed on the bottom line of the
16screen, in the same place as the echo area, but only while it is in
17use for reading an argument.
18
19@menu
20* Intro to Minibuffers:: Basic information about minibuffers.
21* Text from Minibuffer:: How to read a straight text string.
22* Object from Minibuffer:: How to read a Lisp object or expression.
23* Minibuffer History:: Recording previous minibuffer inputs
24 so the user can reuse them.
25* Completion:: How to invoke and customize completion.
26* Yes-or-No Queries:: Asking a question with a simple answer.
27* Multiple Queries:: Asking a series of similar questions.
28* Minibuffer Misc:: Various customization hooks and variables.
29@end menu
30
31@node Intro to Minibuffers
32@section Introduction to Minibuffers
33
34 In most ways, a minibuffer is a normal Emacs buffer. Most operations
35@emph{within} a buffer, such as editing commands, work normally in a
36minibuffer. However, many operations for managing buffers do not apply
37to minibuffers. The name of a minibuffer always has the form @w{@samp{
38*Minibuf-@var{number}}}, and it cannot be changed. Minibuffers are
39displayed only in special windows used only for minibuffers; these
40windows always appear at the bottom of a frame. (Sometime frames have
41no minibuffer window, and sometimes a special kind of frame contains
42nothing but a minibuffer window; see @ref{Minibuffers and Frames}.)
43
44 The minibuffers window is normally a single line. You can resize it
45temporarily with the window sizing commands; it reverts to its normal
46size when the minibuffer is exited. You can resize it permanently by
47using the window sizing commands in the frame's other window, when the
48minibuffer is not active. If the frame contains just a minibuffer, you
49can change the minibuffer's size by changing the frame's size.
50
51 If a command uses a minibuffer while there is an active minibuffer,
52this is called a @dfn{recursive minibuffer}. The first minibuffer is
53named @w{@samp{ *Minibuf-0*}}. Recursive minibuffers are named by
54incrementing the number at the end of the name. (The names begin with a
55space so that they won't show up in normal buffer lists.) Of several
56recursive minibuffers, the innermost (or most recently entered) is the
57active minibuffer. We usually call this ``the'' minibuffer. You can
58permit or forbid recursive minibuffers by setting the variable
59@code{enable-recursive-minibuffers} or by putting properties of that
60name on command symbols (@pxref{Minibuffer Misc}).
61
62 Like other buffers, a minibuffer may use any of several local keymaps
63(@pxref{Keymaps}); these contain various exit commands and in some cases
64completion commands. @xref{Completion}.
65
66@itemize @bullet
67@item
68@code{minibuffer-local-map} is for ordinary input (no completion).
69
70@item
71@code{minibuffer-local-ns-map} is similar, except that @key{SPC} exits
72just like @key{RET}. This is used mainly for Mocklisp compatibility.
73
74@item
75@code{minibuffer-local-completion-map} is for permissive completion.
76
77@item
78@code{minibuffer-local-must-match-map} is for strict completion and
79for cautious completion.
80@end itemize
81
82@node Text from Minibuffer
83@section Reading Text Strings with the Minibuffer
84
85 Most often, the minibuffer is used to read text which is returned as a
86string. It can also be used to read a Lisp object in textual form. The
87most basic primitive for minibuffer input is
88@code{read-from-minibuffer}; it can do either one.
89
90@defun read-from-minibuffer prompt-string &optional initial-contents keymap read hist
91This function is the most general way to get input through the
92minibuffer. By default, it accepts arbitrary text and returns it as a
93string; however, if @var{read} is non-@code{nil}, then it uses
94@code{read} to convert the text into a Lisp object (@pxref{Input
95Functions}).
96
97The first thing this function does is to activate a minibuffer and
98display it with @var{prompt-string} as the prompt. This value must be a
99string.
100
101Then, if @var{initial-contents} is a string, @code{read-from-minibuffer}
102inserts it into the minibuffer, leaving point at the end. The
103minibuffer appears with this text as its contents.
104
105@c Emacs 19 feature
106The value of @var{initial-contents} may also be a cons cell of the form
107@code{(@var{string} . @var{position})}. This means to insert
108@var{string} in the minibuffer but put point @var{position} characters
109from the beginning, rather than at the end.
110
111If @var{keymap} is non-@code{nil}, that keymap is the local keymap to
112use in the minibuffer. If @var{keymap} is omitted or @code{nil}, the
113value of @code{minibuffer-local-map} is used as the keymap. Specifying
114a keymap is the most important way to customize the minibuffer for
115various applications such as completion.
116
117The argument @var{hist} specifies which history list variable to use
118for saving the input and for history commands used in the minibuffer.
119It defaults to @code{minibuffer-history}. @xref{Minibuffer History}.
120
121When the user types a command to exit the minibuffer,
122@code{read-from-minibuffer} uses the text in the minibuffer to produce
123its return value. Normally it simply makes a string containing that
124text. However, if @var{read} is non-@code{nil},
125@code{read-from-minibuffer} reads the text and returns the resulting
126Lisp object, unevaluated. (@xref{Input Functions}, for information
127about reading.)
128@end defun
129
130@defun read-string prompt &optional initial
131This function reads a string from the minibuffer and returns it. The
132arguments @var{prompt} and @var{initial} are used as in
133@code{read-from-minibuffer}. The keymap used is
134@code{minibuffer-local-map}.
135
136This is a simplified interface to the
137@code{read-from-minibuffer} function:
138
139@smallexample
140@group
141(read-string @var{prompt} @var{initial})
142@equiv{}
143(read-from-minibuffer @var{prompt} @var{initial} nil nil)
144@end group
145@end smallexample
146@end defun
147
148@defvar minibuffer-local-map
149This is the default local keymap for reading from the minibuffer. By
150default, it makes the following bindings:
151
152@table @asis
153@item @key{LFD}
154@code{exit-minibuffer}
155
156@item @key{RET}
157@code{exit-minibuffer}
158
159@item @kbd{C-g}
160@code{abort-recursive-edit}
161
162@item @kbd{M-n}
163@code{next-history-element}
164
165@item @kbd{M-p}
166@code{previous-history-element}
167
168@item @kbd{M-r}
169@code{next-matching-history-element}
170
171@item @kbd{M-s}
172@code{previous-matching-history-element}
173@end table
174@end defvar
175
176@c In version 18, initial is required
177@c Emacs 19 feature
178@defun read-no-blanks-input prompt &optional initial
179This function reads a string from the minibuffer, but does not allow
180whitespace characters as part of the input: instead, those characters
181terminate the input. The arguments @var{prompt} and @var{initial} are
182used as in @code{read-from-minibuffer}.
183
184This is a simplified interface to the @code{read-from-minibuffer}
185function, and passes the value of the @code{minibuffer-local-ns-map}
186keymap as the @var{keymap} argument for that function. Since the keymap
187@code{minibuffer-local-ns-map} does not rebind @kbd{C-q}, it @emph{is}
188possible to put a space into the string, by quoting it.
189
190@smallexample
191@group
192(read-no-blanks-input @var{prompt} @var{initial})
193@equiv{}
194(read-from-minibuffer @var{prompt} @var{initial} minibuffer-local-ns-map)
195@end group
196@end smallexample
197@end defun
198
199@defvar minibuffer-local-ns-map
200This built-in variable is the keymap used as the minibuffer local keymap
201in the function @code{read-no-blanks-input}. By default, it makes the
202following bindings:
203
204@table @asis
205@item @key{LFD}
206@code{exit-minibuffer}
207
208@item @key{SPC}
209@cindex @key{SPC} in minibuffer
210@code{exit-minibuffer}
211
212@item @key{TAB}
213@cindex @key{TAB} in minibuffer
214@code{exit-minibuffer}
215
216@item @key{RET}
217@code{exit-minibuffer}
218
219@item @kbd{C-g}
220@code{abort-recursive-edit}
221
222@item @kbd{?}
223@cindex @kbd{?} in minibuffer
224@code{self-insert-and-exit}
225
226@item @kbd{M-n} and @kbd{M-p}
227@code{next-history-element} and @code{previous-history-element}
228
229@item @kbd{M-r}
230@code{next-matching-history-element}
231
232@item @kbd{M-s}
233@code{previous-matching-history-element}
234@end table
235@end defvar
236
237@node Object from Minibuffer
238@section Reading Lisp Objects with the Minibuffer
239
240 This section describes functions for reading Lisp objects with the
241minibuffer.
242
243@defun read-minibuffer prompt &optional initial
244 This function reads a Lisp object in the minibuffer and returns it,
245without evaluating it. The arguments @var{prompt} and @var{initial} are
246used as in @code{read-from-minibuffer}; in particular, @var{initial}
247must be a string or @code{nil}.
248
249 This is a simplified interface to the
250@code{read-from-minibuffer} function:
251
252@smallexample
253@group
254(read-minibuffer @var{prompt} @var{initial})
255@equiv{}
256(read-from-minibuffer @var{prompt} @var{initial} nil t)
257@end group
258@end smallexample
259
260Here is an example in which we supply the string @code{"(testing)"} as
261initial input:
262
263@smallexample
264@group
265(read-minibuffer
266 "Enter an expression: " (format "%s" '(testing)))
267
268;; @r{Here is how the minibuffer is displayed:}
269@end group
270
271@group
272---------- Buffer: Minibuffer ----------
273Enter an expression: (testing)@point{}
274---------- Buffer: Minibuffer ----------
275@end group
276@end smallexample
277
278@noindent
279The user can type @key{RET} immediately to use the initial input as a
280default, or can edit the input.
281@end defun
282
283@defun eval-minibuffer prompt &optional initial
284 This function reads a Lisp expression in the minibuffer, evaluates it,
285then returns the result. The arguments @var{prompt} and @var{initial}
286are used as in @code{read-from-minibuffer}.
287
288 This function simply evaluates the result of a call to
289@code{read-minibuffer}:
290
291@smallexample
292@group
293(eval-minibuffer @var{prompt} @var{initial})
294@equiv{}
295(eval (read-minibuffer @var{prompt} @var{initial}))
296@end group
297@end smallexample
298@end defun
299
300@defun edit-and-eval-command prompt form
301 This function reads a Lisp expression in the minibuffer, and then
302evaluates it. The difference between this command and
303@code{eval-minibuffer} is that here the initial @var{form} is not
304optional and it is treated as a Lisp object to be converted to printed
305representation rather than as a string of text. It is printed with
306@code{prin1}, so if it is a string, double-quote characters (@samp{"})
307appear in the initial text. @xref{Output Functions}.
308
309 The first thing @code{edit-and-eval-command} does is to activate the
310minibuffer with @var{prompt} as the prompt. Then it inserts the printed
311representation of @var{form} in the minibuffer, and lets the user edit.
312When the user exits the minibuffer, the edited text is read with
313@code{read} and then evaluated. The resulting value becomes the value
314of @code{edit-and-eval-command}.
315
316 In the following example, we offer the user an expression with initial
317text which is a valid form already:
318
319@smallexample
320@group
321(edit-and-eval-command "Please edit: " '(forward-word 1))
322
323;; @r{After evaluating the preceding expression,}
324;; @r{the following appears in the minibuffer:}
325@end group
326
327@group
328---------- Buffer: Minibuffer ----------
329Please edit: (forward-word 1)@point{}
330---------- Buffer: Minibuffer ----------
331@end group
332@end smallexample
333
334@noindent
335Typing @key{RET} right away would exit the minibuffer and evaluate the
336expression, thus moving point forward one word.
337@code{edit-and-eval-command} returns @code{nil} in this example.
338@end defun
339
340@node Minibuffer History
341@section Minibuffer History
342@cindex minibuffer history
343@cindex history list
344
345A @dfn{minibuffer history list} records previous minibuffer inputs so
346the user can reuse them conveniently. A history list is a symbol, a
347variable whose value is a list of strings (previous inputs), most recent
348first.
349
350There are many separate history lists, used for different kinds of
351inputs. It's the Lisp programmer's job to specify the right history
352list for each use of the minibuffer.
353
354The basic minibuffer input functions @code{read-from-minibuffer} and
355@code{completing-read} both accept an optional argument named @var{hist}
356which is how you specify the history list. Here are the possible
357values:
358
359@table @asis
360@item @var{variable}
361Use @var{variable} (a symbol) as the history list.
362
363@item (@var{variable} . @var{startpos})
364Use @var{variable} (a symbol) as the history list, and assume that the
365initial history position is @var{startpos} (an integer, counting from
366zero which specifies the most recent element of the history).
367
368If you specify @var{startpos}, then you should also specify that element
369of the history as the initial minibuffer contents, for consistency.
370@end table
371
372If you don't specify @var{hist}, then the default history list
373@code{minibuffer-history} is used. For other standard history lists,
374see below. You can also create your own history list variable; just
375initialize it to @code{nil} before the first use.
376
377Both @code{read-from-minibuffer} and @code{completing-read} add new
378elements to the history list automatically, and provide commands to
379allow the user to reuse items on the list. The only thing your program
380needs to do to use a history list is to initialize it and to pass its
381name to the input functions when you wish. But it is safe to modify the
382list by hand when the minibuffer input functions are not using it.
383
384@defvar minibuffer-history
385The default history list for minibuffer history input.
386@end defvar
387
388@defvar query-replace-history
389A history list for arguments to @code{query-replace} (and similar
390arguments to other commands).
391@end defvar
392
393@defvar file-name-history
394A history list for file name arguments.
395@end defvar
396
397@defvar regexp-history
398A history list for regular expression arguments.
399@end defvar
400
401@defvar extended-command-history
402A history list for arguments that are names of extended commands.
403@end defvar
404
405@defvar shell-command-history
406A history list for arguments that are shell commands.
407@end defvar
408
409@defvar read-expression-history
410A history list for arguments that are Lisp expressions to evaluate.
411@end defvar
412
413@node Completion
414@section Completion
415@cindex completion
416
417 @dfn{Completion} is a feature that fills in the rest of a name
418starting from an abbreviation for it. Completion works by comparing the
419user's input against a list of valid names and determining how much of
420the name is determined uniquely by what the user has typed. For
421example, when you type @kbd{C-x b} (@code{switch-to-buffer}) and then
422type the first few letters of the name of the buffer to which you wish
423to switch, and then type @key{TAB} (@code{minibuffer-complete}), Emacs
424extends the name as far as it can.
425
426 Standard Emacs commands offer completion for names of symbols, files,
427buffers, and processes; with the functions in this section, you can
428implement completion for other kinds of names.
429
430 The @code{try-completion} function is the basic primitive for
431completion: it returns the longest determined completion of a given
432initial string, with a given set of strings to match against.
433
434 The function @code{completing-read} provides a higher-level interface
435for completion. A call to @code{completing-read} specifies how to
436determine the list of valid names. The function then activates the
437minibuffer with a local keymap that binds a few keys to commands useful
438for completion. Other functions provide convenient simple interfaces
439for reading certain kinds of names with completion.
440
441@menu
442* Basic Completion:: Low-level functions for completing strings.
443 (These are too low level to use the minibuffer.)
444* Minibuffer Completion:: Invoking the minibuffer with completion.
445* Completion Commands:: Minibuffer commands that do completion.
446* High-Level Completion:: Convenient special cases of completion
447 (reading buffer name, file name, etc.)
448* Reading File Names:: Using completion to read file names.
449* Programmed Completion:: Finding the completions for a given file name.
450@end menu
451
452@node Basic Completion
453@subsection Basic Completion Functions
454
455@defun try-completion string collection &optional predicate
456This function returns the longest common substring of all possible
457completions of @var{string} in @var{collection}. The value of
458@var{collection} must be an alist, an obarray, or a function which
459implements a virtual set of strings (see below).
460
461Completion compares @var{string} against each of the permissible
462completions specified by @var{collection}; if the beginning of the
463permissible completion equals @var{string}, it matches. If no permissible
464completions match, @code{try-completion} returns @code{nil}. If only
465one permissible completion matches, and the match is exact, then
466@code{try-completion} returns @code{t}. Otherwise, the value is the
467longest initial sequence common to all the permissible completions that
468match.
469
470If @var{collection} is an alist (@pxref{Association Lists}), the
471@sc{car}s of the alist elements form the set of permissible completions.
472
473@cindex obarray in completion
474If @var{collection} is an obarray (@pxref{Creating Symbols}), the names
475of all symbols in the obarray form the set of permissible completions. The
476global variable @code{obarray} holds an obarray containing the names of
477all interned Lisp symbols.
478
479Note that the only valid way to make a new obarray is to create it
480empty and then add symbols to it one by one using @code{intern}.
481Also, you cannot intern a given symbol in more than one obarray.
482
483If the argument @var{predicate} is non-@code{nil}, then it must be a
484function of one argument. It is used to test each possible match, and
485the match is accepted only if @var{predicate} returns non-@code{nil}.
486The argument given to @var{predicate} is either a cons cell from the alist
487(the @sc{car} of which is a string) or else it is a symbol (@emph{not} a
488symbol name) from the obarray.
489
490You can also use a function symbol as @var{collection}. Then the
491function is solely responsible for performing completion;
492@code{try-completion} returns whatever this function returns. The
493function is called with three arguments: @var{string}, @var{predicate}
494and @code{nil}. (The reason for the third argument is so that the same
495function can be used in @code{all-completions} and do the appropriate
496thing in either case.) @xref{Programmed Completion}.
497
498In the first of the following examples, the string @samp{foo} is
499matched by three of the alist @sc{car}s. All of the matches begin with
500the characters @samp{fooba}, so that is the result. In the second
501example, there is only one possible match, and it is exact, so the value
502is @code{t}.
503
504@smallexample
505@group
506(try-completion
507 "foo"
508 '(("foobar1" 1) ("barfoo" 2) ("foobaz" 3) ("foobar2" 4)))
509 @result{} "fooba"
510@end group
511
512@group
513(try-completion "foo" '(("barfoo" 2) ("foo" 3)))
514 @result{} t
515@end group
516@end smallexample
517
518In the following example, numerous symbols begin with the characters
519@samp{forw}, and all of them begin with the word @samp{forward}. In
520most of the symbols, this is followed with a @samp{-}, but not in all,
521so no more than @samp{forward} can be completed.
522
523@smallexample
524@group
525(try-completion "forw" obarray)
526 @result{} "forward"
527@end group
528@end smallexample
529
530Finally, in the following example, only two of the three possible
531matches pass the predicate @code{test} (the string @samp{foobaz} is
532too short). Both of those begin with the string @samp{foobar}.
533
534@smallexample
535@group
536(defun test (s)
537 (> (length (car s)) 6))
538 @result{} test
539@end group
540@group
541(try-completion
542 "foo"
543 '(("foobar1" 1) ("barfoo" 2) ("foobaz" 3) ("foobar2" 4))
544 'test)
545 @result{} "foobar"
546@end group
547@end smallexample
548@end defun
549
550@defun all-completions string collection &optional predicate
551This function returns a list of all possible completions of
552@var{string}. The parameters to this function are the same as to
553@code{try-completion}.
554
555If @var{collection} is a function, it is called with three arguments:
556@var{string}, @var{predicate} and @code{t}; then @code{all-completions}
557returns whatever the function returns. @xref{Programmed Completion}.
558
559Here is an example, using the function @code{test} shown in the
560example for @code{try-completion}:
561
562@smallexample
563@group
564(defun test (s)
565 (> (length (car s)) 6))
566 @result{} test
567@end group
568
569@group
570(all-completions
571 "foo"
572 '(("foobar1" 1) ("barfoo" 2) ("foobaz" 3) ("foobar2" 4))
573 (function test))
574 @result{} ("foobar1" "foobar2")
575@end group
576@end smallexample
577@end defun
578
579@defvar completion-ignore-case
580If the value of this variable is
581non-@code{nil}, Emacs does not consider case significant in completion.
582@end defvar
583
584 The two functions @code{try-completion} and @code{all-completions}
585have nothing in themselves to do with minibuffers. We describe them in
586this chapter so as to keep them near the higher-level completion
587features that do use the minibuffer.
588
589@node Minibuffer Completion
590@subsection Completion and the Minibuffer
591
592 This section describes the basic interface for reading from the
593minibuffer with completion.
594
595@defun completing-read prompt collection &optional predicate require-match initial hist
596This function reads a string in the minibuffer, assisting the user by
597providing completion. It activates the minibuffer with prompt
598@var{prompt}, which must be a string. If @var{initial} is
599non-@code{nil}, @code{completing-read} inserts it into the minibuffer as
600part of the input. Then it allows the user to edit the input, providing
601several commands to attempt completion.
602
603The actual completion is done by passing @var{collection} and
604@var{predicate} to the function @code{try-completion}. This happens in
605certain commands bound in the local keymaps used for completion.
606
607If @var{require-match} is @code{t}, the usual minibuffer exit commands
608won't exit unless the input completes to an element of @var{collection}.
609If @var{require-match} is neither @code{nil} nor @code{t}, then the exit
610commands won't exit unless the input typed is itself an element of
611@var{collection}.
612
613The function @code{completing-read} works by calling
614@code{read-minibuffer}. It uses @code{minibuffer-local-completion-map}
615as the keymap if @var{require-match} is @code{nil}, and uses
616@code{minibuffer-local-must-match-map} if @var{require-match} is
617non-@code{nil}.
618
619The argument @var{hist} specifies which history list variable to use for
620saving the input and for minibuffer history commands. It defaults to
621@code{minibuffer-history}. @xref{Minibuffer History}.
622
623Completion ignores case when comparing the input against the possible
624matches, if the built-in variable @code{completion-ignore-case} is
625non-@code{nil}. @xref{Basic Completion}.
626
627Here's an example of using @code{completing-read}:
628
629@smallexample
630@group
631(completing-read
632 "Complete a foo: "
633 '(("foobar1" 1) ("barfoo" 2) ("foobaz" 3) ("foobar2" 4))
634 nil t "fo")
635@end group
636
637@group
638;; @r{After evaluating the preceding expression,}
639;; @r{the following appears in the minibuffer:}
640
641---------- Buffer: Minibuffer ----------
642Complete a foo: fo@point{}
643---------- Buffer: Minibuffer ----------
644@end group
645@end smallexample
646
647@noindent
648If the user then types @kbd{@key{DEL} @key{DEL} b @key{RET}},
649@code{completing-read} returns @code{barfoo}.
650
651The @code{completing-read} function binds three variables to pass
652information to the commands which actually do completion. Here they
653are:
654
655@table @code
656@item minibuffer-completion-table
657This variable is bound to the @var{collection} argument. It is passed
658to the @code{try-completion} function.
659
660@item minibuffer-completion-predicate
661This variable is bound to the @var{predicate} argument. It is passed to
662the @code{try-completion} function.
663
664@item minibuffer-completion-confirm
665This variable is bound to the @var{require-match} argument. It is used
666in the @code{minibuffer-complete-and-exit} function.
667@end table
668@end defun
669
670@node Completion Commands
671@subsection Minibuffer Commands That Do Completion
672
673 This section describes the keymaps, commands and user options used in
674the minibuffer to do completion.
675
676@defvar minibuffer-local-completion-map
677 @code{completing-read} uses this value as the local keymap when an
678exact match of one of the completions is not required. By default, this
679keymap makes the following bindings:
680
681@table @asis
682@item @kbd{?}
683@code{minibuffer-completion-help}
684
685@item @key{SPC}
686@code{minibuffer-complete-word}
687
688@item @key{TAB}
689@code{minibuffer-complete}
690@end table
691
692@noindent
693with other characters bound as in @code{minibuffer-local-map}.
694@end defvar
695
696@defvar minibuffer-local-must-match-map
697@code{completing-read} uses this value as the local keymap when an
698exact match of one of the completions is required. Therefore, no keys
699are bound to @code{exit-minibuffer}, the command which exits the
700minibuffer unconditionally. By default, this keymap makes the following
701bindings:
702
703@table @asis
704@item @kbd{?}
705@code{minibuffer-completion-help}
706
707@item @key{SPC}
708@code{minibuffer-complete-word}
709
710@item @key{TAB}
711@code{minibuffer-complete}
712
713@item @key{LFD}
714@code{minibuffer-complete-and-exit}
715
716@item @key{RET}
717@code{minibuffer-complete-and-exit}
718@end table
719
720@noindent
721with other characters bound as in @code{minibuffer-local-map}.
722@end defvar
723
724@defvar minibuffer-completion-table
725The value of this variable is the alist or obarray used for completion
726in the minibuffer. This is the global variable that contains what
727@code{completing-read} passes to @code{try-completion}. It is used by
728minibuffer completion commands such as @code{minibuffer-complete-word}.
729@end defvar
730
731@defvar minibuffer-completion-predicate
732This variable's value is the predicate that @code{completing-read}
733passes to @code{try-completion}. The variable is also used by the other
734minibuffer completion functions.
735@end defvar
736
737@deffn Command minibuffer-complete-word
738This function completes the minibuffer contents by at most a single
739word. Even if the minibuffer contents have only one completion,
740@code{minibuffer-complete-word} does not add any characters beyond the
741first character that is not a word constituent. @xref{Syntax Tables}.
742@end deffn
743
744@deffn Command minibuffer-complete
745This function completes the minibuffer contents as far as possible.
746@end deffn
747
748@deffn Command minibuffer-complete-and-exit
749This function completes the minibuffer contents, and exits if
750confirmation is not required, i.e., if
751@code{minibuffer-completion-confirm} is non-@code{nil}. If confirmation
752@emph{is} required, it is given by repeating this command immediately.
753@end deffn
754
755@defvar minibuffer-completion-confirm
756When the value of this variable is non-@code{nil}, Emacs asks for
757confirmation of a completion before exiting the minibuffer. The
758function @code{minibuffer-complete-and-exit} checks the value of this
759variable before it exits.
760@end defvar
761
762@deffn Command minibuffer-completion-help
763This function creates a list of the possible completions of the
764current minibuffer contents. It works by calling @code{all-completions}
765using the value of the variable @code{minibuffer-completion-table} as
766the @var{collection} argument, and the value of
767@code{minibuffer-completion-predicate} as the @var{predicate} argument.
768The list of completions is displayed as text in a buffer named
769@samp{*Completions*}.
770@end deffn
771
772@defun display-completion-list completions
773This function displays @var{completions} to the stream in
774@code{standard-output}, usually a buffer. (@xref{Streams}, for more
775information about streams.) The argument @var{completions} is normally
776a list of completions just returned by @code{all-completions}, but it
777does not have to be. Each element may be a symbol or a string, either
778of which is simply printed, or a list of two strings, which is printed
779as if the strings were concatenated.
780
781This function is called by @code{minibuffer-completion-help}. The
782most common way to use it is together with
783@code{with-output-to-temp-buffer}, like this:
784
785@example
786(with-output-to-temp-buffer "*Completions*"
787 (display-completion-list
788 (all-completions (buffer-string) my-alist)))
789@end example
790@end defun
791
792@defopt completion-auto-help
793If this variable is non-@code{nil}, the completion commands
794automatically display a list of possible completions whenever nothing
795can be completed because the next character is not uniquely determined.
796@end defopt
797
798@node High-Level Completion
799@subsection High-Level Completion Functions
800
801 This section describes the higher-level convenient functions for
802reading certain sorts of names with completion.
803
804@defun read-buffer prompt &optional default existing
805This function reads the name of a buffer and returns it as a string.
806The argument @var{default} is the default name to use, the value to
807return if the user exits with an empty minibuffer. If non-@code{nil},
808it should be a string or a buffer. It is mentioned in the prompt, but
809is not inserted in the minibuffer as initial input.
810
811If @var{existing} is non-@code{nil}, then the name specified must be
812that of an existing buffer. The usual commands to exit the
813minibuffer do not exit if the text is not valid, and @key{RET} does
814completion to attempt to find a valid name. (However, @var{default} is
815not checked for this; it is returned, whatever it is, if the user exits
816with the minibuffer empty.)
817
818In the following example, the user enters @samp{minibuffer.t}, and
819then types @key{RET}. The argument @var{existing} is @code{t}, and the
820only buffer name starting with the given input is
821@samp{minibuffer.texi}, so that name is the value.
822
823@example
824(read-buffer "Buffer name? " "foo" t)
825@group
826;; @r{After evaluating the preceding expression,}
827;; @r{the following prompt appears,}
828;; @r{with an empty minibuffer:}
829@end group
830
831@group
832---------- Buffer: Minibuffer ----------
833Buffer name? (default foo) @point{}
834---------- Buffer: Minibuffer ----------
835@end group
836
837@group
838;; @r{The user types @kbd{minibuffer.t @key{RET}}.}
839 @result{} "minibuffer.texi"
840@end group
841@end example
842@end defun
843
844@defun read-command prompt
845This function reads the name of a command and returns it as a Lisp
846symbol. The argument @var{prompt} is used as in
847@code{read-from-minibuffer}. Recall that a command is anything for
848which @code{commandp} returns @code{t}, and a command name is a symbol
849for which @code{commandp} returns @code{t}. @xref{Interactive Call}.
850
851@example
852(read-command "Command name? ")
853
854@group
855;; @r{After evaluating the preceding expression,}
856;; @r{the following prompt appears with an empty minibuffer:}
857@end group
858
859@group
860---------- Buffer: Minibuffer ----------
861Command name?
862---------- Buffer: Minibuffer ----------
863@end group
864@end example
865
866@noindent
867If the user types @kbd{forward-c @key{RET}}, then this function returns
868@code{forward-char}.
869
870The @code{read-command} function is a simplified interface to the
871function @code{completing-read}. It uses the variable @code{obarray} so
872as to complete in the set of extant Lisp symbols, and it uses the
873@code{commandp} predicate so as to accept only command names:
874
875@cindex @code{commandp} example
876@example
877@group
878(read-command @var{prompt})
879@equiv{}
880(intern (completing-read @var{prompt} obarray
881 'commandp t nil))
882@end group
883@end example
884@end defun
885
886@defun read-variable prompt
887This function reads the name of a user variable and returns it as a
888symbol.
889
890@example
891@group
892(read-variable "Variable name? ")
893
894;; @r{After evaluating the preceding expression,}
895;; @r{the following prompt appears,}
896;; @r{with an empty minibuffer:}
897@end group
898
899@group
900---------- Buffer: Minibuffer ----------
901Variable name? @point{}
902---------- Buffer: Minibuffer ----------
903@end group
904@end example
905
906@noindent
907If the user then types @kbd{fill-p @key{RET}}, @code{read-variable}
908returns @code{fill-prefix}.
909
910This function is similar to @code{read-command}, but uses the
911predicate @code{user-variable-p} instead of @code{commandp}:
912
913@cindex @code{user-variable-p} example
914@example
915@group
916(read-variable @var{prompt})
917@equiv{}
918(intern
919 (completing-read @var{prompt} obarray
920 'user-variable-p t nil))
921@end group
922@end example
923@end defun
924
925@node Reading File Names
926@subsection Reading File Names
927
928 Here is another high-level completion function, designed for reading a
929file name. It provides special features including automatic insertion
930of the default directory.
931
932@defun read-file-name prompt &optional directory default existing initial
933This function reads a file name in the minibuffer, prompting with
934@var{prompt} and providing completion. If @var{default} is
935non-@code{nil}, then the function returns @var{default} if the user just
936types @key{RET}.
937
938If @var{existing} is non-@code{nil}, then the name must refer to an
939existing file; then @key{RET} performs completion to make the name valid
940if possible, and then refuses to exit if it is not valid. If the value
941of @var{existing} is neither @code{nil} nor @code{t}, then @key{RET}
942also requires confirmation after completion.
943
944The argument @var{directory} specifies the directory to use for
945completion of relative file names. Usually it is inserted in the
946minibuffer as initial input as well. It defaults to the current
947buffer's value of @code{default-directory}.
948
949@c Emacs 19 feature
950If you specify @var{initial}, that is an initial file name to insert in
951the buffer along with @var{directory}. In this case, point goes after
952@var{directory}, before @var{initial}. The default for @var{initial} is
953@code{nil}---don't insert any file name. To see what @var{initial}
954does, try the command @kbd{C-x C-v}.
955
956Here is an example:
957
958@example
959@group
960(read-file-name "The file is ")
961
962;; @r{After evaluating the preceding expression,}
963;; @r{the following appears in the minibuffer:}
964@end group
965
966@group
967---------- Buffer: Minibuffer ----------
968The file is /gp/gnu/elisp/@point{}
969---------- Buffer: Minibuffer ----------
970@end group
971@end example
972
973@noindent
974Typing @kbd{manual @key{TAB}} results in the following:
975
976@example
977@group
978---------- Buffer: Minibuffer ----------
979The file is /gp/gnu/elisp/manual.texi@point{}
980---------- Buffer: Minibuffer ----------
981@end group
982@end example
983
984@c Wordy to avoid overfull hbox in smallbook mode.
985@noindent
986If the user types @key{RET}, @code{read-file-name} returns the file name
987as the string @code{"/gp/gnu/elisp/manual.texi"}.
988@end defun
989
990@defopt insert-default-directory
991This variable is used by @code{read-file-name}. Its value controls
992whether @code{read-file-name} starts by placing the name of the default
993directory in the minibuffer, plus the initial file name if any. If the
994value of this variable is @code{nil}, then @code{read-file-name} does
995not place any initial input in the minibuffer. In that case, the
996default directory is still used for completion of relative file names,
997but is not displayed.
998
999For example:
1000
1001@example
1002@group
1003;; @r{Here the minibuffer starts out with the default directory.}
1004(let ((insert-default-directory t))
1005 (read-file-name "The file is "))
1006@end group
1007
1008@group
1009---------- Buffer: Minibuffer ----------
1010The file is ~lewis/manual/@point{}
1011---------- Buffer: Minibuffer ----------
1012@end group
1013
1014@group
1015;; @r{Here the minibuffer is empty and only the prompt}
1016;; @r{appears on its line.}
1017(let ((insert-default-directory nil))
1018 (read-file-name "The file is "))
1019@end group
1020
1021@group
1022---------- Buffer: Minibuffer ----------
1023The file is @point{}
1024---------- Buffer: Minibuffer ----------
1025@end group
1026@end example
1027@end defopt
1028
1029@node Programmed Completion
1030@subsection Programmed Completion
1031@cindex programmed completion
1032
1033 Sometimes it is not possible to create an alist or an obarray
1034containing all the intended possible completions. In such a case, you
1035can supply your own function to compute the completion of a given string.
1036This is called @dfn{programmed completion}.
1037
1038 To use this feature, pass a symbol with a function definition as the
1039@var{collection} argument to @code{completing-read}. This function
1040arranges to pass your completion function along to @code{try-completion}
1041and @code{all-completions}, which will then let your function do all the
1042work.
1043
1044 The completion function should accept three arguments:
1045
1046@itemize @bullet
1047@item
1048The string to be completed.
1049
1050@item
1051The predicate function to filter possible matches, or @code{nil} if
1052none. Your function should call the predicate for each possible match,
1053and ignore the possible match if the predicate returns @code{nil}.
1054
1055@item
1056A flag specifying the type of operation.
1057@end itemize
1058
1059 There are three flag values for three operations:
1060
1061@itemize @bullet
1062@item
1063@code{nil} specifies @code{try-completion}. The completion function
1064should return the completion of the specified string, or @code{t} if the
1065string is an exact match already, or @code{nil} if the string matches no
1066possibility.
1067
1068@item
1069@code{t} specifies @code{all-completions}. The completion function
1070should return a list of all possible completions of the specified
1071string.
1072
1073@item
1074@code{lambda} specifies a test for an exact match. The completion
1075function should return @code{t} if the specified string is an exact
1076match for some possibility; @code{nil} otherwise.
1077@end itemize
1078
1079 It would be consistent and clean for completion functions to allow
1080lambda expressions (lists which are functions) as well as function
1081symbols as @var{collection}, but this is impossible. Lists as
1082completion tables are already assigned another meaning---as alists. It
1083would be unreliable to fail to handle an alist normally because it is
1084also a possible function. So you must arrange for any function you wish
1085to use for completion to be encapsulated in a symbol.
1086
1087 Emacs uses programmed completion when completing file names.
1088@xref{File Name Completion}.
1089
1090@node Yes-or-No Queries
1091@section Yes-or-No Queries
1092@cindex asking the user questions
1093@cindex querying the user
1094@cindex yes-or-no questions
1095
1096 This section describes functions used to ask the user a yes-or-no
1097question. The function @code{y-or-n-p} can be answered with a single
1098character; it is useful for questions where an inadvertent wrong answer
1099will not have serious consequences. @code{yes-or-no-p} is suitable for
1100more momentous questions, since it requires three or four characters to
1101answer.
1102
1103 Strictly speaking, @code{yes-or-no-p} uses the minibuffer and
1104@code{y-or-n-p} does not; but it seems best to describe them together.
1105
1106@defun y-or-n-p prompt
1107 This function asks the user a question, expecting input in the echo
1108area. It returns @code{t} if the user types @kbd{y}, @code{nil} if the
1109user types @kbd{n}. This function also accepts @key{SPC} to mean yes
1110and @key{DEL} to mean no. It accepts @kbd{C-]} to mean ``quit'', like
1111@kbd{C-g}, because the question might look like a minibuffer and for
1112that reason the user might try to use @kbd{C-]} to get out. The answer
1113is a single character, with no @key{RET} needed to terminate it. Upper
1114and lower case are equivalent.
1115
1116 ``Asking the question'' means printing @var{prompt} in the echo area,
1117followed by the string @w{@samp{(y or n) }}. If the input is not one of
1118the expected answers (@kbd{y}, @kbd{n}, @kbd{@key{SPC}},
1119@kbd{@key{DEL}}, or something that quits), the function responds
1120@samp{Please answer y or n.}, and repeats the request.
1121
1122 This function does not actually use the minibuffer, since it does not
1123allow editing of the answer. It actually uses the echo area (@pxref{The
1124Echo Area}), which uses the same screen space as the minibuffer. The
1125cursor moves to the echo area while the question is being asked.
1126
1127 The answers and their meanings, even @samp{y} and @samp{n}, are not
1128hardwired. The keymap @code{query-replace-map} specifies them.
1129@xref{Search and Replace}.
1130
1131 If @code{y-or-n-p} is called in a command that was invoked using the
1132mouse---more precisely, if @code{last-nonmenu-event} (@pxref{Command
1133Loop Info}) is either @code{nil} or a mouse event---then it uses a
1134dialog box or pop-up menu to ask the question. In this case, it does
1135not use keyboard input or the echo area.
1136
1137 In the following example, the user first types @kbd{q}, which is
1138invalid. At the next prompt the user types @kbd{y}.
1139
1140@smallexample
1141@group
1142(y-or-n-p "Do you need a lift? ")
1143
1144;; @r{After evaluating the preceding expression,}
1145;; @r{the following prompt appears in the echo area:}
1146@end group
1147
1148@group
1149---------- Echo area ----------
1150Do you need a lift? (y or n)
1151---------- Echo area ----------
1152@end group
1153
1154;; @r{If the user then types @kbd{q}, the following appears:}
1155
1156@group
1157---------- Echo area ----------
1158Please answer y or n. Do you need a lift? (y or n)
1159---------- Echo area ----------
1160@end group
1161
1162;; @r{When the user types a valid answer,}
1163;; @r{it is displayed after the question:}
1164
1165@group
1166---------- Echo area ----------
1167Do you need a lift? (y or n) y
1168---------- Echo area ----------
1169@end group
1170@end smallexample
1171
1172@noindent
1173We show successive lines of echo area messages, but only one actually
1174appears on the screen at a time.
1175@end defun
1176
1177@defun yes-or-no-p prompt
1178 This function asks the user a question, expecting input in minibuffer.
1179It returns @code{t} if the user enters @samp{yes}, @code{nil} if the
1180user types @samp{no}. The user must type @key{RET} to finalize the
1181response. Upper and lower case are equivalent.
1182
1183 @code{yes-or-no-p} starts by displaying @var{prompt} in the echo area,
1184followed by @w{@samp{(yes or no) }}. The user must type one of the
1185expected responses; otherwise, the function responds @samp{Please answer
1186yes or no.}, waits about two seconds and repeats the request.
1187
1188 @code{yes-or-no-p} requires more work from the user than
1189@code{y-or-n-p} and is appropriate for more crucial decisions.
1190
1191 If @code{yes-or-no-p} is called in a command that was invoked using
1192the mouse---more precisely, if @code{last-nonmenu-event} (@pxref{Command
1193Loop Info}) is either @code{nil} or a mouse event---then it uses a
1194dialog box or pop-up menu to ask the question. In this case, it does
1195not use keyboard input or the echo area.
1196
1197Here is an example:
1198
1199@smallexample
1200@group
1201(yes-or-no-p "Do you really want to remove everything? ")
1202
1203;; @r{After evaluating the preceding expression,}
1204;; @r{the following prompt appears,}
1205;; @r{with an empty minibuffer:}
1206@end group
1207
1208@group
1209---------- Buffer: minibuffer ----------
1210Do you really want to remove everything? (yes or no)
1211---------- Buffer: minibuffer ----------
1212@end group
1213@end smallexample
1214
1215@noindent
1216If the user first types @kbd{y @key{RET}}, which is invalid because this
1217function demands the entire word @samp{yes}, it responds by displaying
1218these prompts, with a brief pause between them:
1219
1220@smallexample
1221@group
1222---------- Buffer: minibuffer ----------
1223Please answer yes or no.
1224Do you really want to remove everything? (yes or no)
1225---------- Buffer: minibuffer ----------
1226@end group
1227@end smallexample
1228@end defun
1229
1230@node Multiple Queries
1231@section Asking Multiple Y-or-N Questions
1232
1233@defun map-y-or-n-p prompter actor list &optional help action-alist
1234This function, new in Emacs 19, asks the user a series of questions,
1235reading a single-character answer in the echo area for each one.
1236
1237The value of @var{list} specifies the objects to ask questions about.
1238It should be either a list of objects or a generator function. If it is
1239a function, it should expect no arguments, and should return either the
1240next object to ask about, or @code{nil} meaning stop asking questions.
1241
1242The argument @var{prompter} specifies how to ask each question. If
1243@var{prompter} is a string, the question text is computed like this:
1244
1245@example
1246(format @var{prompter} @var{object})
1247@end example
1248
1249@noindent
1250where @var{object} is the next object to ask about (as obtained from
1251@var{list}).
1252
1253If not a string, @var{prompter} should be a function of one argument
1254(the next object to ask about) and should return the question text.
1255
1256The argument @var{actor} says how to act on the answers that the user
1257gives. It should be a function of one argument, and it is called with
1258each object that the user says yes for. Its argument is always an
1259object obtained from @var{list}.
1260
1261If the argument @var{help} is given, it should be a list of this form:
1262
1263@example
1264(@var{singular} @var{plural} @var{action})
1265@end example
1266
1267@noindent
1268where @var{singular} is a string containing a singular noun that
1269describes the objects conceptually being acted on, @var{plural} is the
1270corresponding plural noun, and @var{action} is a transitive verb
1271describing what @var{actor} does.
1272
1273If you don't specify @var{help}, the default is @code{("object"
1274"objects" "act on")}.
1275
1276Each time a question is asked, the user may enter @kbd{y}, @kbd{Y}, or
1277@key{SPC} to act on that object; @kbd{n}, @kbd{N}, or @key{DEL} to skip
1278that object; @kbd{!} to act on all following objects; @key{ESC} or
1279@kbd{q} to exit (skip all following objects); @kbd{.} (period) to act on
1280the current object and then exit; or @kbd{C-h} to get help. These are
1281the same answers that @code{query-replace} accepts. The keymap
1282@code{query-replace-map} defines their meaning for @code{map-y-or-n-p}
1283as well as for @code{query-replace}; see @ref{Search and Replace}.
1284
1285You can use @var{action-alist} to specify additional possible answers
1286and what they mean. It is an alist of elements of the form
1287@code{(@var{char} @var{function} @var{help})}, each of which defines one
1288additional answer. In this element, @var{char} is a character (the
1289answer); @var{function} is a function of one argument (an object from
1290@var{list}); @var{help} is a string.
1291
1292When the user responds with @var{char}, @code{map-y-or-n-p} calls
1293@var{function}. If it returns non-@code{nil}, the object is considered
1294``acted upon'', and @code{map-y-or-n-p} advances to the next object in
1295@var{list}. If it returns @code{nil}, the prompt is repeated for the
1296same object.
1297
1298The return value of @code{map-y-or-n-p} is the number of objects acted on.
1299@end defun
1300
1301@node Minibuffer Misc
1302@comment node-name, next, previous, up
1303@section Minibuffer Miscellany
1304
1305 This section describes some basic functions and variables related to
1306minibuffers.
1307
1308@deffn Command exit-minibuffer
1309This command exits the active minibuffer. It is normally bound to
1310keys in minibuffer local keymaps.
1311@end deffn
1312
1313@deffn Command self-insert-and-exit
1314This command exits the active minibuffer after inserting the last
1315character typed on the keyboard (found in @code{last-command-char};
1316@pxref{Command Loop Info}).
1317@end deffn
1318
1319@deffn Command previous-history-element n
1320This command replaces the minibuffer contents with the value of the
1321@var{n}th previous (older) history element.
1322@end deffn
1323
1324@deffn Command next-history-element n
1325This command replaces the minibuffer contents with the value of the
1326@var{n}th more recent history element.
1327@end deffn
1328
1329@deffn Command previous-matching-history-element pattern
1330This command replaces the minibuffer contents with the value of the
1331previous (older) history element that matches @var{pattern}.
1332@end deffn
1333
1334@deffn Command next-matching-history-element pattern
1335This command replaces the minibuffer contents with the value of the
1336next (newer) history element that matches @var{pattern}.
1337@end deffn
1338
1339@defvar minibuffer-setup-hook
1340This is a normal hook that is run whenever the minibuffer is entered.
1341@end defvar
1342
1343@defvar minibuffer-help-form
1344The current value of this variable is used to rebind @code{help-form}
1345locally inside the minibuffer (@pxref{Help Functions}).
1346@end defvar
1347
1348@defun minibuffer-window &optional frame
1349This function returns the window that is used for the minibuffer. In
1350Emacs 18, there is one and only one minibuffer window; this window
1351always exists and cannot be deleted. In Emacs 19, each frame can have
1352its own minibuffer, and this function returns the minibuffer window used
1353for frame @var{frame} (which defaults to the currently selected frame).
1354@end defun
1355
1356@c Emacs 19 feature
1357@defun window-minibuffer-p window
1358This function returns non-@code{nil} if @var{window} is a minibuffer window.
1359@end defun
1360
1361It is not correct to determine whether a given window is a minibuffer by
1362comparing it with the result of @code{(minibuffer-window)}, because
1363there can be more than one minibuffer window if there is more than one
1364frame.
1365
1366@defun minibuffer-window-active-p window
1367This function returns non-@code{nil} if @var{window}, assumed to be
1368a minibuffer window, is currently active.
1369@end defun
1370
1371@defvar minibuffer-scroll-window
1372If the value of this variable is non-@code{nil}, it should be a window
1373object. When the function @code{scroll-other-window} is called in the
1374minibuffer, it scrolls this window.
1375@end defvar
1376
1377Finally, some functions and variables deal with recursive minibuffers
1378(@pxref{Recursive Editing}):
1379
1380@defun minibuffer-depth
1381This function returns the current depth of activations of the
1382minibuffer, a nonnegative integer. If no minibuffers are active, it
1383returns zero.
1384@end defun
1385
1386@defopt enable-recursive-minibuffers
1387If this variable is non-@code{nil}, you can invoke commands (such as
1388@code{find-file}) which use minibuffers even while in the minibuffer
1389window. Such invocation produces a recursive editing level for a new
1390minibuffer. The outer-level minibuffer is invisible while you are
1391editing the inner one.
1392
1393This variable only affects invoking the minibuffer while the
1394minibuffer window is selected. If you switch windows while in the
1395minibuffer, you can always invoke minibuffer commands while some other
1396window is selected.
1397@end defopt
1398
1399@c Emacs 19 feature
1400If a command name has a property @code{enable-recursive-minibuffers}
1401which is non-@code{nil}, then the command can use the minibuffer to read
1402arguments even if it is invoked from the minibuffer. The minibuffer
1403command @code{next-matching-history-element} (normally bound to
1404@kbd{M-s} in the minibuffer) uses this feature.