[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/vc-got f0d7c7e7cf 6/7: simplify some bits of code
From: |
ELPA Syncer |
Subject: |
[elpa] externals/vc-got f0d7c7e7cf 6/7: simplify some bits of code |
Date: |
Sat, 28 May 2022 11:58:12 -0400 (EDT) |
branch: externals/vc-got
commit f0d7c7e7cfb672768f74d899163439451088b147
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Omar Polo <op@omarpolo.com>
simplify some bits of code
---
vc-got.el | 12 +++++-------
1 file changed, 5 insertions(+), 7 deletions(-)
diff --git a/vc-got.el b/vc-got.el
index 2cf17f80b5..1c7735f345 100755
--- a/vc-got.el
+++ b/vc-got.el
@@ -1,6 +1,6 @@
;;; vc-got.el --- VC backend for Game of Trees VCS -*- lexical-binding: t;
-*-
-;; Copyright (C) 2021 Free Software Foundation, Inc.
+;; Copyright (C) 2021-2022 Free Software Foundation, Inc.
;; Author: Omar Polo <op@omarpolo.com>
;; Timo Myyrä <timo.myyra@bittivirhe.fi>
@@ -401,10 +401,9 @@ files on disk."
(let (process-file-side-effects)
(vc-got-with-worktree default-directory
(with-temp-buffer
- (if (zerop (vc-got--call "branch" "--" name))
- t
- (error "[vc-got] can't create branch %s: %s" name
- (buffer-string)))))))
+ (or (zerop (vc-got--call "branch" "--" name))
+ (error "[vc-got] can't create branch %s: %s" name
+ (buffer-string)))))))
;; Backend properties
@@ -432,8 +431,7 @@ files on disk."
nil ; got doesn't track directories
(when (vc-find-root file ".got")
(let ((s (vc-got-state file)))
- (not (or (eq s 'unregistered)
- (null s)))))))
+ (not (memq s '(nil unregistered)))))))
(defun vc-got-state (file)
"Return the current version control state of FILE. See `vc-state'."
- [elpa] externals/vc-got updated (86d9909a7e -> d009a36e09), ELPA Syncer, 2022/05/28
- [elpa] externals/vc-got 16a2f37b7f 3/7: update vc-got-{pull, push} docstrings, ELPA Syncer, 2022/05/28
- [elpa] externals/vc-got d009a36e09 7/7: ignore files created by elpa, ELPA Syncer, 2022/05/28
- [elpa] externals/vc-got 78607b0cc5 1/7: update package URL, ELPA Syncer, 2022/05/28
- [elpa] externals/vc-got f0d7c7e7cf 6/7: simplify some bits of code,
ELPA Syncer <=
- [elpa] externals/vc-got dd4e6a2cc7 5/7: fix the quote in the docstring of `vc-got--status', ELPA Syncer, 2022/05/28
- [elpa] externals/vc-got 18cc42ab3c 4/7: tag 1.1.1, ELPA Syncer, 2022/05/28
- [elpa] externals/vc-got b3b5f78ac6 2/7: don't list the TODO in the package description, ELPA Syncer, 2022/05/28