X-Git-Url: http://git.sven.stormbind.net/?a=blobdiff_plain;f=tests%2FgetInfo.tcl;h=1f996bfa5f669cac0579a4b962468d729d52ad23;hb=681f13b357762e8109b693cb6ec5fc5be5ea7119;hp=f19cf24155adb5ff237375250fcebd396ea9ca0f;hpb=c5c2b241e5700c3b7a1cc681fb837594fdd169ef;p=sven%2Ftclcurl.git

diff --git a/tests/getInfo.tcl b/tests/getInfo.tcl
index f19cf24..1f996bf 100755
--- a/tests/getInfo.tcl
+++ b/tests/getInfo.tcl
@@ -7,6 +7,9 @@ $curlHandle perform
 
 puts "Url: [$curlHandle getinfo effectiveurl]"
 puts "Primary IP: [$curlHandle getinfo primaryip]"
+puts "Primary port: [$curlHandle getinfo primaryport]"
+puts "Local IP: [$curlHandle getinfo localip]"
+puts "Local port: [$curlHandle getinfo localport]"
 puts "Redirect url: [$curlHandle getinfo redirecturl]"
 puts "Http-code: [$curlHandle getinfo responsecode]"
 puts "Proxy response code: [$curlHandle getinfo httpconnectcode]"