diff --git a/htools/rpc-test.hs b/htools/rpc-test.hs
index 61022581e73e269f89b7d9b3b7b2a9103f2d7923..0fc5b2dd204ce39c955269782da402502f990452 100644
--- a/htools/rpc-test.hs
+++ b/htools/rpc-test.hs
@@ -52,4 +52,6 @@ main = do
             mapM (getNode cfg) nodes
   results <- executeRpcCall nodes' call
   putStr $ printTable "" ["Node", "Result"]
-           (map (\(n, r) -> [nodeName n, show r]) results) [False, False]
+           (map (\(n, r) -> [nodeName n, either explainRpcError show r])
+                results)
+           [False, False]