showFR _ (BuildFailureNotInIndex pn)      = " (unknown package: " ++ display pn ++ ")"
showFR _ (BuildFailureNotInIndex pn)      = " (unknown package: " ++ display pn ++ ")"
showFR _ (BuildFailureNotInIndex pn)      = " (unknown package: " ++ display pn ++ ")"