summaryrefslogtreecommitdiff
path: root/lisp/vc/vc-git.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2015-06-16 20:28:48 -0400
committerGlenn Morris <rgm@gnu.org>2015-06-16 20:28:48 -0400
commitd5152a7eef9dbb8b6953f9efdd44bcdbca2311dd (patch)
tree79bdf051e029151a53abc5fe632f3cc9970d5200 /lisp/vc/vc-git.el
parent55b41a82cdbb682a4657ddc47d194e5813cf262b (diff)
downloademacs-d5152a7eef9dbb8b6953f9efdd44bcdbca2311dd.tar.gz
Address some compilation warnings.
* lisp/elec-pair.el (electric-pair-post-self-insert-function): * lisp/vc/vc-git.el (vc-git-file-type-as-string): Replace 't' with '_' in pcase.
Diffstat (limited to 'lisp/vc/vc-git.el')
-rw-r--r--lisp/vc/vc-git.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/vc/vc-git.el b/lisp/vc/vc-git.el
index e3cd5d4e3dc..9522328cae8 100644
--- a/lisp/vc/vc-git.el
+++ b/lisp/vc/vc-git.el
@@ -308,12 +308,12 @@ matching the resulting Git log output, and KEYWORDS is a list of
(pcase old-type
(?\100 " (type change file -> symlink)")
(?\160 " (type change subproject -> symlink)")
- (t " (symlink)")))
+ (_ " (symlink)")))
(?\160 ;; Subproject.
(pcase old-type
(?\100 " (type change file -> subproject)")
(?\120 " (type change symlink -> subproject)")
- (t " (subproject)")))
+ (_ " (subproject)")))
(?\110 nil) ;; Directory (internal, not a real git state).
(?\000 ;; Deleted or unknown.
(pcase old-type