Commit Diff


commit - a96df0e8b9c0b1f0170a9d1f4a3a17c35d0d0529
commit + ddc59a024c62d068bb1b71292f0ea0c74497cb17
blob - 2c991ad02c071c26b8d9d099e1cae7e34f4a5582
blob + 2689c7ebf1ee5e952da5fe18cc26d9131fca3787
--- vc-got.el
+++ vc-got.el
@@ -445,10 +445,10 @@ DIR-OR-FILE."
 (defun vc-got-unregister (file)
   "Unregister given FILE, i.e. remove file if it was versioned
 file or revert it if it was added but not committed."
-  (pcase ((status (cdr (vc-got--parse-status (vc-got--status file)))))
+  (pcase (status (cdr (vc-got--parse-status (vc-got--status file))))
     ('unregistered nil) ;; no need for action
     ((or 'added 'missing) (vc-got--revert file))
-    (default (vc-got--remove file))))
+    (_ (vc-got--remove file))))
 
 (defalias 'vc-got-responsible-p #'vc-got-root)