diff --git a/Handler/Package.hs b/Handler/Package.hs
index 0d8a03f..6527267 100644
--- a/Handler/Package.hs
+++ b/Handler/Package.hs
@@ -17,6 +17,7 @@ getPackageR pn = do
         packages <- E.select $ E.from $ \(p, s) -> do
             E.where_ $ (p ^. PackageStackage E.==. s ^. StackageId)
                    &&. (p ^. PackageName' E.==. E.val pn)
+                   &&. (s ^. StackageTitle `E.like` E.val "%, exclusive")
             E.orderBy [E.desc $ s ^. StackageUploaded]
             E.limit maxSnaps
             --selectList [PackageName' ==. pn] [LimitTo 10, Desc PackageStackage]
diff --git a/templates/package.hamlet b/templates/package.hamlet
index 5a0288f..cb54e26 100644
--- a/templates/package.hamlet
+++ b/templates/package.hamlet
@@ -15,7 +15,7 @@
         <ul>
             $forall (Value version, Value title, Value ident, Value hasHaddocks) <- packages
                 <li>
-                    <a href=@{StackageHomeR ident}>#{title}
+                    <a href=@{StackageHomeR ident}>#{fromMaybe title $ stripSuffix ", exclusive" title}
                     (version #{version})
                     $if hasHaddocks
                         <a href=@{haddocksLink ident version}>(haddocks)