[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/files.el
From: |
Kim F . Storm |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/files.el |
Date: |
Wed, 09 Feb 2005 10:51:17 -0500 |
Index: emacs/lisp/files.el
diff -c emacs/lisp/files.el:1.744 emacs/lisp/files.el:1.745
*** emacs/lisp/files.el:1.744 Sat Jan 29 17:28:00 2005
--- emacs/lisp/files.el Wed Feb 9 15:50:42 2005
***************
*** 305,311 ****
(const :tag "When visiting or saving" visit-save)
(other :tag "Ask" ask))
:group 'editing-basics
! :version "21.4")
(defcustom auto-save-default t
"*Non-nil says by default do auto-saving of every file-visiting buffer."
--- 305,311 ----
(const :tag "When visiting or saving" visit-save)
(other :tag "Ask" ask))
:group 'editing-basics
! :version "22.1")
(defcustom auto-save-default t
"*Non-nil says by default do auto-saving of every file-visiting buffer."
***************
*** 377,383 ****
The functions are called in the order given until one of them returns
non-nil.")
(defvaralias 'find-file-not-found-hooks 'find-file-not-found-functions)
(make-obsolete-variable
! 'find-file-not-found-hooks 'find-file-not-found-functions "21.4")
;;;It is not useful to make this a local variable.
;;;(put 'find-file-hooks 'permanent-local t)
--- 377,383 ----
The functions are called in the order given until one of them returns
non-nil.")
(defvaralias 'find-file-not-found-hooks 'find-file-not-found-functions)
(make-obsolete-variable
! 'find-file-not-found-hooks 'find-file-not-found-functions "22.1")
;;;It is not useful to make this a local variable.
;;;(put 'find-file-hooks 'permanent-local t)
***************
*** 388,396 ****
:group 'find-file
:type 'hook
:options '(auto-insert)
! :version "21.4")
(defvaralias 'find-file-hooks 'find-file-hook)
! (make-obsolete-variable 'find-file-hooks 'find-file-hook "21.4")
(defvar write-file-functions nil
"List of functions to be called before writing out a buffer to a file.
--- 388,396 ----
:group 'find-file
:type 'hook
:options '(auto-insert)
! :version "22.1")
(defvaralias 'find-file-hooks 'find-file-hook)
! (make-obsolete-variable 'find-file-hooks 'find-file-hook "22.1")
(defvar write-file-functions nil
"List of functions to be called before writing out a buffer to a file.
***************
*** 409,420 ****
updates before the buffer is saved, use `before-save-hook' .")
(put 'write-file-functions 'permanent-local t)
(defvaralias 'write-file-hooks 'write-file-functions)
! (make-obsolete-variable 'write-file-hooks 'write-file-functions "21.4")
(defvar local-write-file-hooks nil)
(make-variable-buffer-local 'local-write-file-hooks)
(put 'local-write-file-hooks 'permanent-local t)
! (make-obsolete-variable 'local-write-file-hooks 'write-file-functions "21.4")
(defvar write-contents-functions nil
"List of functions to be called before writing out a buffer to a file.
--- 409,420 ----
updates before the buffer is saved, use `before-save-hook' .")
(put 'write-file-functions 'permanent-local t)
(defvaralias 'write-file-hooks 'write-file-functions)
! (make-obsolete-variable 'write-file-hooks 'write-file-functions "22.1")
(defvar local-write-file-hooks nil)
(make-variable-buffer-local 'local-write-file-hooks)
(put 'local-write-file-hooks 'permanent-local t)
! (make-obsolete-variable 'local-write-file-hooks 'write-file-functions "22.1")
(defvar write-contents-functions nil
"List of functions to be called before writing out a buffer to a file.
***************
*** 434,440 ****
use `before-save-hook'.")
(make-variable-buffer-local 'write-contents-functions)
(defvaralias 'write-contents-hooks 'write-contents-functions)
! (make-obsolete-variable 'write-contents-hooks 'write-contents-functions
"21.4")
(defcustom enable-local-variables t
"*Control use of local variables in files you visit.
--- 434,440 ----
use `before-save-hook'.")
(make-variable-buffer-local 'write-contents-functions)
(defvaralias 'write-contents-hooks 'write-contents-functions)
! (make-obsolete-variable 'write-contents-hooks 'write-contents-functions
"22.1")
(defcustom enable-local-variables t
"*Control use of local variables in files you visit.
***************
*** 1284,1290 ****
When nil, never request confirmation."
:group 'files
:group 'find-file
! :version "21.4"
:type '(choice integer (const :tag "Never request confirmation" nil)))
(defun find-file-noselect (filename &optional nowarn rawfile wildcards)
--- 1284,1290 ----
When nil, never request confirmation."
:group 'files
:group 'find-file
! :version "22.1"
:type '(choice integer (const :tag "Never request confirmation" nil)))
(defun find-file-noselect (filename &optional nowarn rawfile wildcards)
***************
*** 2378,2384 ****
they appear in an `eval' local variable specification, without first
asking you for confirmation."
:group 'find-file
! :version "21.4"
:type '(repeat sexp))
(put 'c-set-style 'safe-local-eval-function t)
--- 2378,2384 ----
they appear in an `eval' local variable specification, without first
asking you for confirmation."
:group 'find-file
! :version "22.1"
:type '(repeat sexp))
(put 'c-set-style 'safe-local-eval-function t)
***************
*** 3470,3476 ****
(buffer-list)
'("buffer" "buffers" "save")
save-some-buffers-action-alist))
! ;; Maybe to save abbrevs, and record whether
;; we either saved them or asked to.
(and save-abbrevs abbrevs-changed
(progn
--- 3470,3476 ----
(buffer-list)
'("buffer" "buffers" "save")
save-some-buffers-action-alist))
! ;; Maybe to save abbrevs, and record whether
;; we either saved them or asked to.
(and save-abbrevs abbrevs-changed
(progn
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/files.el,
Kim F . Storm <=