Skip to content

I
intranet-xmlrpc
Commit 2cdef24c authored by Frank Bergmann's avatar Frank Bergmann
Browse files
Options

- removed any fixed URLs

parent 684ed388
Hide whitespace changes
Inline Side-by-side
Showing with 8 additions and 8 deletions
www/call-test-2.tcl
View file @ 2cdef24c
...@@ -8,7 +8,7 @@ ad_page_contract { ...@@ -8,7 +8,7 @@ ad_page_contract {
timestamp timestamp
token token
object_type object_type
{url "/RPC2/" } url
{method "sqlapi.call"} {method "sqlapi.call"}
} }
...@@ -44,7 +44,7 @@ if {[catch { ...@@ -44,7 +44,7 @@ if {[catch {
] ]
set query_results [xmlrpc::remote_call \ set query_results [xmlrpc::remote_call \
http://172.26.0.3:30038/RPC2 \ $url \
"sqlapi.call" \ "sqlapi.call" \
-array $authinfo \ -array $authinfo \
-string $object_type \ -string $object_type \
......
www/call-test.tcl
View file @ 2cdef24c
...@@ -7,7 +7,7 @@ ad_page_contract { ...@@ -7,7 +7,7 @@ ad_page_contract {
user_id user_id
timestamp timestamp
token token
{url "/RPC2/" } url
} }
...@@ -36,7 +36,7 @@ if {[catch { ...@@ -36,7 +36,7 @@ if {[catch {
] ]
set query_results [xmlrpc::remote_call \ set query_results [xmlrpc::remote_call \
http://172.26.0.3:30038/RPC2 \ $url \
sqlapi.object_types \ sqlapi.object_types \
-array $authinfo -array $authinfo
] ]
......
www/select-test-4.tcl
View file @ 2cdef24c
...@@ -8,7 +8,7 @@ ad_page_contract { ...@@ -8,7 +8,7 @@ ad_page_contract {
timestamp timestamp
token token
object_id object_id
{url "/RPC2/" } url
{method "sqlapi.select"} {method "sqlapi.select"}
} }
...@@ -43,7 +43,7 @@ if {[catch { ...@@ -43,7 +43,7 @@ if {[catch {
# sqlapi.select(user_id timestamp token object_type object_id) # sqlapi.select(user_id timestamp token object_type object_id)
set query_results [xmlrpc::remote_call \ set query_results [xmlrpc::remote_call \
http://172.26.0.3:30038/RPC2 \ $url \
sqlapi.object_info \ sqlapi.object_info \
-array $authinfo \ -array $authinfo \
-int $object_id \ -int $object_id \
......
www/select-test.tcl
View file @ 2cdef24c
...@@ -7,7 +7,7 @@ ad_page_contract { ...@@ -7,7 +7,7 @@ ad_page_contract {
user_id user_id
timestamp timestamp
token token
{url "/RPC2/" } url
} }
...@@ -36,7 +36,7 @@ if {[catch { ...@@ -36,7 +36,7 @@ if {[catch {
] ]
set query_results [xmlrpc::remote_call \ set query_results [xmlrpc::remote_call \
http://172.26.0.3:30038/RPC2 \ $url \
sqlapi.object_types \ sqlapi.object_types \
-array $authinfo -array $authinfo
] ]
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment