X-Git-Url: https://git.hcoop.net/hcoop/domtool2.git/blobdiff_plain/e7905534fc80fd5eeee68f33cbdc15572c858b05..504618b9ccf4bdbd8b3e27f799770b16c6358a71:/src/main.sml diff --git a/src/main.sml b/src/main.sml index 2e350cc..7473fb6 100644 --- a/src/main.sml +++ b/src/main.sml @@ -176,6 +176,7 @@ fun context x = (OpenSSL.context false x) handle e as OpenSSL.OpenSSL s => (print "Couldn't find your certificate.\nYou probably haven't been given any Domtool privileges.\n"; + print ("I looked in: " ^ #1 x ^ "\n"); print ("Additional information: " ^ s ^ "\n"); raise e)