@@ -159,7 +159,7 @@ runDeclRef :: DeclarationRef -> Maybe String
159runDeclRef (PositionedDeclarationRef _ _ ref) = runDeclRef ref
159runDeclRef (PositionedDeclarationRef _ _ ref) = runDeclRef ref
160runDeclRef (ValueRef ident) = Just $ showIdent ident
160runDeclRef (ValueRef ident) = Just $ showIdent ident
161runDeclRef (TypeRef pn _) = Just $ runProperName pn
161runDeclRef (TypeRef pn _) = Just $ runProperName pn
162−runDeclRef (TypeClassRef pn) = Just $ "class " ++ runProperName pn
162+runDeclRef (TypeClassRef pn) = Just $ runProperName pn
163runDeclRef _ = Nothing
163runDeclRef _ = Nothing
165getTypeRef :: DeclarationRef -> Maybe (ProperName, Maybe [ProperName])
165getTypeRef :: DeclarationRef -> Maybe (ProperName, Maybe [ProperName])