diff --git a/ghc/driver/ghc.lprl b/ghc/driver/ghc.lprl
index 2b697244a8ac4a4de1b10991b4924a8a534ba474..6296b9162e3093c31acbe045f926ad2d018fd118 100644
--- a/ghc/driver/ghc.lprl
+++ b/ghc/driver/ghc.lprl
@@ -915,7 +915,6 @@ sub setupOptimiseFlags {
 #LATER:	'-fcalc-inlinings2', -- pointless for 2.01
 
       # stg2stg passes
-	'-fupdate-analysis',
 	'-flambda-lift',
 	$Oopt_FinalStgProfilingMassage,
 	$Oopt_StgStats,
@@ -925,6 +924,7 @@ sub setupOptimiseFlags {
 
       # SPECIAL FLAGS for -O2
 	($OptLevel == 2) ? (
+	  '-fupdate-analysis',	# virtually useless; relegated to -O2
 	  '-fsemi-tagging',
 	) : (),
       );