[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Changes to gnats/contrib/tkgnats/tkquerypr.tcl
From: |
Michael Richardson |
Subject: |
Changes to gnats/contrib/tkgnats/tkquerypr.tcl |
Date: |
Tue, 07 Jan 2003 02:07:09 -0500 |
Index: gnats/contrib/tkgnats/tkquerypr.tcl
diff -c gnats/contrib/tkgnats/tkquerypr.tcl:1.6
gnats/contrib/tkgnats/tkquerypr.tcl:1.7
*** gnats/contrib/tkgnats/tkquerypr.tcl:1.6 Wed Dec 18 23:17:54 2002
--- gnats/contrib/tkgnats/tkquerypr.tcl Tue Jan 7 02:07:09 2003
***************
*** 265,272 ****
set Query(query_pr_opts) "$prid_list"
} {
set Query(query_pr_opts) ""
foreach prid $prid_list {
! append Query(query_pr_opts) "Number==$prid_list|"
}
append Query(query_pr_opts) " "
}
--- 265,274 ----
set Query(query_pr_opts) "$prid_list"
} {
set Query(query_pr_opts) ""
+ set sep ""
foreach prid $prid_list {
! append Query(query_pr_opts) [concat $sep "Number==$prid_list"]
! set sep "|"
}
append Query(query_pr_opts) " "
}
***************
*** 1132,1139 ****
if {$mode != "save"} {
set Query(default__query) [list proc default__query {flds}
{return 1}]
set Query(query_pr_opts) ""
foreach prid $prid_list {
! append Query(query_pr_opts) "Number==$prid_list|"
}
append Query(query_pr_opts) " "
set Query(by_id_only) 1
--- 1134,1143 ----
if {$mode != "save"} {
set Query(default__query) [list proc default__query {flds}
{return 1}]
set Query(query_pr_opts) ""
+ set sep ""
foreach prid $prid_list {
! append Query(query_pr_opts) [concat $sep "Number==$prid_list"]
! set sep "|"
}
append Query(query_pr_opts) " "
set Query(by_id_only) 1
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- Changes to gnats/contrib/tkgnats/tkquerypr.tcl,
Michael Richardson <=