Casting and Costume Management Application
Check-in [b072aa31a0]
Not logged in

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Correct typo in index name.
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1:b072aa31a0cc4c850fd4811c23593533cacfd87a
User & Date: gerald 2015-09-21 05:37:38
Context
2015-09-21
06:00
Corrected typo in index name. Leaf check-in: 1e178a9551 user: gerald tags: trunk
05:37
Correct typo in index name. check-in: b072aa31a0 user: gerald tags: trunk
2014-12-20
17:12
Coalese of performer records now working to eliminate duplicates. check-in: a27311d251 user: gerald tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to src/Functions/SetPerformer.tcl.

224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
            set CharacterDescription $dbArr(CharacterDescription)
            set key1 Key_$ShowId
            set key2 ${key1}_$CharacterClass
            set key3 ${key2}_$CharacterCode
            if {$lastKey(ShowId) ne $ShowId} {
                $w insert {} end -id $key1 -text $ShowId
                set lastKey(ShowId) $ShowId
                set lastKey(CharacterCode) {}
            }
            if {$lastKey(CharacterClass) ne $CharacterClass} {
                $w insert $key1 end -id $key2 -text $CharacterClass
                set lastKey(CharacterClass) $CharacterClass
            }
            $w insert $key2 end -id $key3 -text $CharacterDescription -values $rowList
        }
    }

}







|










224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
            set CharacterDescription $dbArr(CharacterDescription)
            set key1 Key_$ShowId
            set key2 ${key1}_$CharacterClass
            set key3 ${key2}_$CharacterCode
            if {$lastKey(ShowId) ne $ShowId} {
                $w insert {} end -id $key1 -text $ShowId
                set lastKey(ShowId) $ShowId
                set lastKey(CharacterClass) {}
            }
            if {$lastKey(CharacterClass) ne $CharacterClass} {
                $w insert $key1 end -id $key2 -text $CharacterClass
                set lastKey(CharacterClass) $CharacterClass
            }
            $w insert $key2 end -id $key3 -text $CharacterDescription -values $rowList
        }
    }

}