aboutsummaryrefslogtreecommitdiff
path: root/examples/ssl.client
diff options
context:
space:
mode:
Diffstat (limited to 'examples/ssl.client')
-rw-r--r--examples/ssl.client6
1 files changed, 5 insertions, 1 deletions
diff --git a/examples/ssl.client b/examples/ssl.client
index f0699b4..58be7b3 100644
--- a/examples/ssl.client
+++ b/examples/ssl.client
@@ -2,7 +2,11 @@
load_ssl_certs /etc/ssl/certs
set s [[socket stream 127.0.0.1:20000] ssl]
-$s verify
+try {
+ $s verify
+} on error msg {
+ stderr puts $msg
+}
foreach i [range 1 20] {
$s puts "1 << $i"