diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,5 +1,13 @@
 # Changelog for Calamity
 
+## 0.1.11.2
+
+*2020-06-03*
+
+* Moved the internal `UpdatedMessage` from
+  `Calamity.Types.Model.Channel.Message` into
+  `Calamity.Types.Model.Channel.UpdatedMessage`.
+
 ## 0.1.11.0
 
 *2020-05-31*
diff --git a/calamity.cabal b/calamity.cabal
--- a/calamity.cabal
+++ b/calamity.cabal
@@ -4,10 +4,10 @@
 --
 -- see: https://github.com/sol/hpack
 --
--- hash: 12a035b3d93c607f12c355b451e20803b1c5e62716eddb253a236cf2467effe3
+-- hash: ba16c0e978455ebd1dd04a85ba656738289d036e6dfe9e45b55d5843d6511fab
 
 name:           calamity
-version:        0.1.11.1
+version:        0.1.11.2
 synopsis:       A library for writing discord bots
 description:    Please see the README on GitHub at <https://github.com/nitros12/calamity#readme>
 category:       Network, Web
@@ -100,6 +100,7 @@
       Calamity.Types.Model.Channel.Guild.Voice
       Calamity.Types.Model.Channel.Message
       Calamity.Types.Model.Channel.Reaction
+      Calamity.Types.Model.Channel.UpdatedMessage
       Calamity.Types.Model.Channel.Webhook
       Calamity.Types.Model.Guild
       Calamity.Types.Model.Guild.AuditLog
diff --git a/src/Calamity/Gateway/DispatchEvents.hs b/src/Calamity/Gateway/DispatchEvents.hs
--- a/src/Calamity/Gateway/DispatchEvents.hs
+++ b/src/Calamity/Gateway/DispatchEvents.hs
@@ -5,7 +5,7 @@
 import           Calamity.Internal.ConstructorName
 import           Calamity.Internal.Utils                     ()
 import           Calamity.Types.Model.Channel
-import           Calamity.Types.Model.Channel.Message
+import           Calamity.Types.Model.Channel.UpdatedMessage
 import           Calamity.Types.Model.Guild.Ban
 import           Calamity.Types.Model.Guild.Emoji
 import           Calamity.Types.Model.Guild.Guild
diff --git a/src/Calamity/Internal/Updateable.hs b/src/Calamity/Internal/Updateable.hs
--- a/src/Calamity/Internal/Updateable.hs
+++ b/src/Calamity/Internal/Updateable.hs
@@ -4,7 +4,7 @@
 
 import           Calamity.Internal.Utils
 import           Calamity.Types.Model.Channel
-import           Calamity.Types.Model.Channel.Message
+import           Calamity.Types.Model.Channel.UpdatedMessage
 import           Calamity.Types.Model.Guild.Guild
 import           Calamity.Types.Model.User
 
diff --git a/src/Calamity/Types/Model/Channel.hs b/src/Calamity/Types/Model/Channel.hs
--- a/src/Calamity/Types/Model/Channel.hs
+++ b/src/Calamity/Types/Model/Channel.hs
@@ -19,7 +19,7 @@
 import           Calamity.Types.Model.Channel.Embed
 import           Calamity.Types.Model.Channel.Group
 import           Calamity.Types.Model.Channel.Guild
-import {-# SOURCE #-} Calamity.Types.Model.Channel.Message hiding ( UpdatedMessage )
+import {-# SOURCE #-} Calamity.Types.Model.Channel.Message
 import           Calamity.Types.Model.Channel.Reaction
 import           Calamity.Types.Model.Channel.Webhook
 import           Calamity.Types.Partial
diff --git a/src/Calamity/Types/Model/Channel/Message.hs b/src/Calamity/Types/Model/Channel/Message.hs
--- a/src/Calamity/Types/Model/Channel/Message.hs
+++ b/src/Calamity/Types/Model/Channel/Message.hs
@@ -1,7 +1,6 @@
 -- | A message from a channel
 module Calamity.Types.Model.Channel.Message
     ( Message(..)
-    , UpdatedMessage(..)
     , MessageType(..) ) where
 
 import           Calamity.Internal.AesonThings
@@ -54,28 +53,6 @@
   deriving ( HasID Message ) via HasIDField "id" Message
   deriving ( HasID Channel ) via HasIDField "channelID" Message
   deriving ( HasID User ) via HasIDField "author" Message
-
-data UpdatedMessage = UpdatedMessage
-  { id              :: Snowflake Message
-  , channelID       :: Snowflake Channel
-  , content         :: Maybe Text
-  , editedTimestamp :: Maybe UTCTime
-  , tts             :: Maybe Bool
-  , mentionEveryone :: Maybe Bool
-  , mentions        :: Maybe (UV.Vector (Snowflake User))
-  , mentionRoles    :: Maybe (UV.Vector (Snowflake Role))
-  , attachments     :: Maybe [Attachment]
-  , embeds          :: Maybe [Embed]
-  , reactions       :: Maybe [Reaction]
-  , pinned          :: Maybe Bool
-  }
-  deriving ( Eq, Show, Generic )
-  deriving ( TextShow ) via TSG.FromGeneric UpdatedMessage
-  deriving ( FromJSON ) via WithSpecialCases
-      '["author" `ExtractField` "id", "mentions" `ExtractFields` "id"]
-      UpdatedMessage
-  deriving ( HasID Message ) via HasIDField "id" UpdatedMessage
-  deriving ( HasID Channel ) via HasIDField "channelID" UpdatedMessage
 
 -- Thanks sbrg (https://github.com/saevarb/haskord/blob/d1bb07bcc4f3dbc29f2dfd3351ff9f16fc100c07/haskord-lib/src/Haskord/Types/Common.hs#L264)
 data MessageType
diff --git a/src/Calamity/Types/Model/Channel/Message.hs-boot b/src/Calamity/Types/Model/Channel/Message.hs-boot
--- a/src/Calamity/Types/Model/Channel/Message.hs-boot
+++ b/src/Calamity/Types/Model/Channel/Message.hs-boot
@@ -1,18 +1,12 @@
 -- | A message from a channel
 module Calamity.Types.Model.Channel.Message
     ( Message
-    , UpdatedMessage
     , MessageType ) where
 
 data Message
 
 instance Show Message
 instance Eq Message
-
-data UpdatedMessage
-
-instance Show UpdatedMessage
-instance Eq UpdatedMessage
 
 data MessageType
 
diff --git a/src/Calamity/Types/Model/Channel/UpdatedMessage.hs b/src/Calamity/Types/Model/Channel/UpdatedMessage.hs
new file mode 100644
--- /dev/null
+++ b/src/Calamity/Types/Model/Channel/UpdatedMessage.hs
@@ -0,0 +1,43 @@
+-- | Updated messages
+module Calamity.Types.Model.Channel.UpdatedMessage
+    ( UpdatedMessage(..)
+     ) where
+
+import           Calamity.Internal.AesonThings
+import           Calamity.Internal.Utils          ()
+import           Calamity.Types.Model.Channel
+import           Calamity.Types.Model.Guild.Role
+import           Calamity.Types.Model.User
+import           Calamity.Types.Snowflake
+
+import           Data.Aeson
+import           Data.Text.Lazy                   ( Text )
+import           Data.Time
+import qualified Data.Vector.Unboxed              as UV
+
+import           GHC.Generics
+
+import           TextShow
+import qualified TextShow.Generic                 as TSG
+
+data UpdatedMessage = UpdatedMessage
+  { id              :: Snowflake Message
+  , channelID       :: Snowflake Channel
+  , content         :: Maybe Text
+  , editedTimestamp :: Maybe UTCTime
+  , tts             :: Maybe Bool
+  , mentionEveryone :: Maybe Bool
+  , mentions        :: Maybe (UV.Vector (Snowflake User))
+  , mentionRoles    :: Maybe (UV.Vector (Snowflake Role))
+  , attachments     :: Maybe [Attachment]
+  , embeds          :: Maybe [Embed]
+  , reactions       :: Maybe [Reaction]
+  , pinned          :: Maybe Bool
+  }
+  deriving ( Eq, Show, Generic )
+  deriving ( TextShow ) via TSG.FromGeneric UpdatedMessage
+  deriving ( FromJSON ) via WithSpecialCases
+      '["author" `ExtractField` "id", "mentions" `ExtractFields` "id"]
+      UpdatedMessage
+  deriving ( HasID Message ) via HasIDField "id" UpdatedMessage
+  deriving ( HasID Channel ) via HasIDField "channelID" UpdatedMessage