mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-05 20:43:08 +00:00
Code Issues Releases Activity

(viper-file-checked-in-p): Use `and'

Browse Source 
instead of `progn'.
This commit is contained in:
Gerd Moellmann 2001-08-07 14:41:37 +00:00
parent d466fa4dcf
commit 23f46f6fa4
2 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/ChangeLog
View File

@ -1,5 +1,8 @@
2001-08-07 Gerd Moellmann <gerd@gnu.org>
* emulation/viper-util.el (viper-file-checked-in-p): Use `and'
instead of `progn'.
* tar-mode.el (tar-extract): Avoid generating a new buffer
for each file visited. From Markus Rost <rost@math.ohio-state.edu>.

2
lisp/emulation/viper-util.el
View File

@ -694,7 +694,7 @@
;; CVS files are considered not checked in
(not (memq (vc-backend file) '(nil CVS)))
(if (fboundp 'vc-state)
(progn
(and
(not (memq (vc-state file) '(edited needs-merge)))
(not (stringp (vc-state file))))
;; XEmacs has no vc-state