diff --git a/pinned-warnings.cabal b/pinned-warnings.cabal
--- a/pinned-warnings.cabal
+++ b/pinned-warnings.cabal
@@ -4,7 +4,7 @@
 -- http://haskell.org/cabal/users-guide/
 
 name:                pinned-warnings
-version:             0.1.0.14
+version:             0.1.0.15
 synopsis: Preserve warnings in a GHCi session
 description: Please see the README on GitHub at <https://github.com/aaronallen8455/pinned-warnings#readme>
 homepage:       https://github.com/aaronallen8455/pinned-warnings#readme
diff --git a/src/Internal/FixWarnings.hs b/src/Internal/FixWarnings.hs
--- a/src/Internal/FixWarnings.hs
+++ b/src/Internal/FixWarnings.hs
@@ -173,7 +173,7 @@
         -> Just $ start'' <> BS.dropSpace end''
         | otherwise -> Just $ start'' <> end'
       -- If bound on the right by ')', remove the suffix containing ',' from start
-      (')', _) -> Just $ BS.init startTrim <> end'
+      (')', _) -> Just $ BS.dropWhileEnd (== ',') startTrim <> end'
         where
           startTrim = BS.dropWhileEnd isSpace start''
       _ -> Nothing
diff --git a/test/Spec.hs b/test/Spec.hs
--- a/test/Spec.hs
+++ b/test/Spec.hs
@@ -87,6 +87,9 @@
 
       fixRedundancyWarning 1 (IndividualThings [":|"]) input23
         @?= Just output23
+
+      fixRedundancyWarning 1 (IndividualThings ["foo"]) input24
+        @?= Just output24
   ]
 
 input1, output1 :: BS.ByteString
@@ -214,3 +217,7 @@
 input23, output23 :: [BS.ByteString]
 input23 = [ "import Data.List.NonEmpty (NonEmpty((:|), bar), foo)" ]
 output23 = [ "import Data.List.NonEmpty (NonEmpty(bar), foo)" ]
+
+input24, output24 :: [BS.ByteString]
+input24 = [ "import Foo (Foo(foo))" ]
+output24 = [ "import Foo (Foo)" ]