872 |
if {$mode == "socket"} { |
if {$mode == "socket"} { |
873 |
# XXX GNATS 4 |
# XXX GNATS 4 |
874 |
#set str "$gnatsd_commands($tag.$when) $date" |
#set str "$gnatsd_commands($tag.$when) $date" |
875 |
|
if { $when == "after" } { |
876 |
|
set str "$tag > \"$date\"" |
877 |
|
} { |
878 |
|
set str "$tag < \"$date\"" |
879 |
|
} |
880 |
} { |
} { |
881 |
set str "--$var=$date" |
set str "--$var=$date" |
882 |
} |
} |
1131 |
textset Number $prid_list $Query(stextparent,Number) |
textset Number $prid_list $Query(stextparent,Number) |
1132 |
if {$mode != "save"} { |
if {$mode != "save"} { |
1133 |
set Query(default__query) [list proc default__query {flds} {return 1}] |
set Query(default__query) [list proc default__query {flds} {return 1}] |
1134 |
if {$TkGnats(GNATS_ACCESS_METHOD) == "batch"} { |
set Query(query_pr_opts) "" |
1135 |
set Query(query_pr_opts) "" |
foreach prid $prid_list { |
1136 |
foreach prid $prid_list { |
append Query(query_pr_opts) "Number==$prid_list|" |
1137 |
append Query(query_pr_opts) "Number==$prid_list|" |
} |
1138 |
} |
append Query(query_pr_opts) " " |
|
append Query(query_pr_opts) " " |
|
|
} { |
|
|
set Query(query_pr_opts) "$Query(query_mode) $prid_list" |
|
|
} |
|
1139 |
set Query(by_id_only) 1 |
set Query(by_id_only) 1 |
1140 |
query_cmd $prid_list |
query_cmd $prid_list |
1141 |
return 1 |
return 1 |