Commit e34aa6e9 authored by Leigh Stoller's avatar Leigh Stoller

Add a comment in real_set for the special handling of the opt arrary.

parent f3808de6
...@@ -403,6 +403,10 @@ proc set {args} { ...@@ -403,6 +403,10 @@ proc set {args} {
real_set var [lindex $args 0] real_set var [lindex $args 0]
real_set val [lindex $args 1] real_set val [lindex $args 1]
#
# This is the special OPT array, which we need to keep ordered
# when inserting into the DB.
#
if {[regexp {^opt\((.*)\)} $var d optname]} { if {[regexp {^opt\((.*)\)} $var d optname]} {
real_set optarray_order($optarray_count) $optname real_set optarray_order($optarray_count) $optname
incr optarray_count incr optarray_count
......
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