amusing name

This is both a partial Prelude that conflicts with the real one, and a
way to guard against the Prelude's partial functions.

2 files changed, 4 insertions, 4 deletions

diff --git a/Common.hs b/Common.hs
index f3dd701b1..90895f08e 100644
--- a/Common.hs
+++ b/Common.hs
@@ -26,4 +26,4 @@ import Utility.Path as X
 import Utility.Directory as X
 import Utility.Monad as X
 
-import Utility.BadPrelude as X
+import Utility.PartialPrelude as X
diff --git a/Utility/BadPrelude.hs b/Utility/PartialPrelude.hs
index 04c9d9b0b..ad857196d 100644
--- a/Utility/BadPrelude.hs
+++ b/Utility/PartialPrelude.hs
@@ -1,11 +1,11 @@
-{- Some stuff from Prelude should not be used, as it tends to be a source
- - of bugs.
+{- Parts of the Prelude are partial functions, which are a common source of
+ - bugs.
  -
  - This exports functions that conflict with the prelude, which avoids
  - them being accidentially used.
  -}
 
-module Utility.BadPrelude where
+module Utility.PartialPrelude where
 
 {- read should be avoided, as it throws an error
  - Instead, use: readMaybe -}