[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/cus-edit.el
From: |
Lute Kamstra |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/cus-edit.el |
Date: |
Tue, 03 Jun 2003 07:24:07 -0400 |
Index: emacs/lisp/cus-edit.el
diff -c emacs/lisp/cus-edit.el:1.183 emacs/lisp/cus-edit.el:1.184
*** emacs/lisp/cus-edit.el:1.183 Sun Jun 1 14:40:10 2003
--- emacs/lisp/cus-edit.el Tue Jun 3 07:24:06 2003
***************
*** 1214,1220 ****
;; To be more complete, we should also kill all permanent-local variables,
;; but it's not needed for custom.
(let ((buf (get-buffer name)))
! (when (buffer-local-value 'buffer-file-name buf)
;; This will check if the file is not saved.
(kill-buffer buf)
(setq buf nil))
--- 1214,1220 ----
;; To be more complete, we should also kill all permanent-local variables,
;; but it's not needed for custom.
(let ((buf (get-buffer name)))
! (when (and buf (buffer-local-value 'buffer-file-name buf))
;; This will check if the file is not saved.
(kill-buffer buf)
(setq buf nil))