mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki 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
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