diff --git a/proofmode/tactics.v b/proofmode/tactics.v
index 15d7aa249a0ede55320c6594f45af275f04efd12..30ddc4b771f088b945546f498d97437bf126766d 100644
--- a/proofmode/tactics.v
+++ b/proofmode/tactics.v
@@ -97,8 +97,6 @@ Tactic Notation "iAssumption" :=
 
 (** * False *)
 Tactic Notation "iExFalso" := apply tac_ex_falso.
-Tactic Notation "iContradiction" constr(H) := iExFalso; iExact H.
-Tactic Notation "iContradiction" := iExFalso; iAssumption.
 
 (** * Pure introduction *)
 Tactic Notation "iIntro" "{" simple_intropattern(x) "}" :=
@@ -551,7 +549,7 @@ Tactic Notation "iDestructHyp" constr(H) "as" constr(pat) :=
     | IFrame => iFrame Hz
     | IName ?y => iRename Hz into y
     | IPersistent ?pat => iPersistent Hz; go Hz pat
-    | IList [[]] => iContradiction Hz
+    | IList [[]] => iExFalso; iExact Hz
     | IList [[?pat1; ?pat2]] =>
        let Hy := iFresh in iSepDestruct Hz as Hz Hy; go Hz pat1; go Hy pat2
     | IList [[?pat1];[?pat2]] => iOrDestruct Hz as Hz Hz; [go Hz pat1|go Hz pat2]