Changeset 4131 for trunk/lisp/files.el

Timestamp:

07/29/06 07:48:34 (2 years ago)

Author:

miyoshi

Message:

Sync up with Emacs CVS HEAD.

Files:

• trunk/lisp/files.el (modified) (34 diffs)

trunk/lisp/files.el

@@ -45 +45 @@
-
-(defcustom delete-auto-save-files t
-*
+
-
-Note that the auto-save file will not be deleted if the buffer is killed
@@ -54 +54 @@
-(defcustom directory-abbrev-alist
-  nil
-*
+
-A list of elements of the form (FROM . TO), each meaning to replace
-FROM with TO when it appears in a directory name.  This replacement is
@@ -75 +75 @@
-;; Turn off backup files on VMS since it has version numbers.
-(defcustom make-backup-files (not (eq system-type 'vax-vms))
-*
+
-This can be done by renaming the file or by copying.
-
@@ -104 +104 @@
-
-(defcustom backup-by-copying nil
-*
+
-See documentation of variable `make-backup-files'."
- :type 'boolean
@@ -110 +110 @@
-
-(defcustom backup-by-copying-when-linked nil
-*
+
-This causes the alternate names to refer to the latest version as edited.
-This variable is relevant only if `backup-by-copying' is nil."
@@ -117 +117 @@
-
-(defcustom backup-by-copying-when-mismatch nil
-*
+
-Renaming may still be used (subject to control of other variables)
-when it would not result in changing the owner or group of the file;
@@ -127 +127 @@
-
-(defcustom backup-by-copying-when-privileged-mismatch 200
-*
+
-Renaming may still be used (subject to control of other variables)
-when it would not result in changing the owner of the file or if the owner
@@ -143 +143 @@
-
-(defcustom buffer-offer-save nil
-*
+
-Do so even if the buffer is not visiting a file.
-Automatically local in all buffers."
@@ -151 +151 @@
-
-(defcustom find-file-existing-other-name t
-*
+
-This means if any existing buffer is visiting the file you want
-under another name, you get the existing buffer instead of a new buffer."
@@ -166 +166 @@
-
-(defcustom revert-without-query nil
-*
+
-The value is a list of regular expressions.
-If the file name matches one of these regular expressions,
@@ -227 +227 @@
-
-(defcustom file-precious-flag nil
-*
+
-Some modes set this non-nil in particular buffers.
-
@@ -242 +242 @@
-
-(defcustom version-control nil
-*
+
-t means make numeric backup versions unconditionally.
-nil means make them for files that have some already.
@@ -255 +255 @@
-
-(defcustom dired-kept-versions 2
-*
+
-  :type 'integer
-  :group 'backup
@@ -261 +261 @@
-
-(defcustom delete-old-versions nil
-*
+
-If nil, ask confirmation.  Any other value prevents any trimming."
-  :type '(choice (const :tag "Delete" t)
@@ -269 +269 @@
-
-(defcustom kept-old-versions 2
-*
+
-  :type 'integer
-  :group 'backup)
@@ -275 +275 @@
-
-(defcustom kept-new-versions 2
-*
+
-Includes the new backup.  Must be > 0"
-  :type 'integer
@@ -282 +282 @@
-
-(defcustom require-final-newline nil
-*
+
-
-A value of t means do this only when the file is about to be saved.
@@ -300 +300 @@
-
-(defcustom mode-require-final-newline t
-*
+
-Those modes set `require-final-newline' to this value when you enable them.
-They do so because they are often used for files that are supposed
@@ -323 +323 @@
-
-(defcustom auto-save-default t
-*
+
-  :type 'boolean
-  :group 'auto-save)
-
-(defcustom auto-save-visited-file-name nil
-*
+
-Normally auto-save files are written under other names."
-  :type 'boolean
@@ -338 +338 @@
-     ;; transformed to "/2" on DOS/Windows.
-     ,(concat temporary-file-directory "\\2") t))
-*
+
-Each transform is a list (REGEXP REPLACEMENT UNIQUIFY):
-REGEXP is a regular expression to match against the file name.
@@ -365 +365 @@
-
-(defcustom save-abbrevs t
-*
+
-If `silently', don't ask the user before saving."
-  :type '(choice (const t) (const nil) (const silently))
@@ -371 +371 @@
-
-(defcustom find-file-run-dired t
-*
+
-To visit the directory, `find-file' runs `find-directory-functions'."
-  :type 'boolean
@@ -377 +377 @@
-
-(defcustom find-directory-functions '(cvs-dired-noselect dired-noselect)
-*
+
-Each function is called with the directory name as the sole argument
-and should return either a buffer or nil."
@@ -449 +449 @@
-
-(defcustom enable-local-variables t
-*
+
-The value can be t, nil, :safe, or something else.
-
@@ -507 +507 @@
-
-(defcustom view-read-only nil
-*
+
-In fact, this means that all read-only buffers normally have
-View mode enabled, including buffers that are read-only because
@@ -1325 +1325 @@
-
-(defcustom find-file-not-true-dirname-list nil
-*
+
-On VMS, when you visit a file using a logical name that searches a path,
-you may or may not want the visited file name to record the specific
@@ -1374 +1374 @@
-
-(defcustom find-file-wildcards t
-*
+
-For example, if you specify `*.c', that would visit all the files
-whose names match the pattern."
@@ -1382 +1382 @@
-
-(defcustom find-file-suppress-same-file-warnings nil
-*
+
-When nil, Emacs prints a warning when visiting a file that is already
-visited, but with a different name.  Setting this option to t
@@ -2304 +2304 @@
-
-(defcustom safe-local-eval-forms nil
-*
+
-Add expressions to this list if you want Emacs to evaluate them, when
-they appear in an `eval' local variable specification, without first
@@ -2765 +2765 @@
-
-(defcustom change-major-mode-with-file-name t
-*
+
-However, the mode will not be changed if
-\(1) a local variables list or the `-*-' line specifies a major mode, or
@@ -4500 +4500 @@
-(defcustom list-directory-brief-switches
-  (if (eq system-type 'vax-vms) "" "-CF")
-*
+
-  :type 'string
-  :group 'dired)
@@ -4508 +4508 @@
-      "/PROTECTION/SIZE/DATE/OWNER/WIDTH=(OWNER:10)"
-    "-l")
-*
+
-  :type 'string
-  :group 'dired)
@@ -4639 +4639 @@
-
-(defcustom directory-free-space-program "df"
-*
+
-We assume the output has the format of `df'.
-The value of this variable must be just a command name or file name;
@@ -4653 +4653 @@
-(defcustom directory-free-space-args
-  (if (eq system-type 'darwin) "-k" "-Pk")
-*
+
-  :type 'string
-  :group 'dired)