Keep legacy and current restore behaviour separate

This commit is contained in:
HummyPkg 2018-12-19 08:38:43 +00:00
parent 9de13741c8
commit ea4feec008

View File

@ -1236,12 +1236,14 @@ proc {rsv restore} {file} {
# This is to support old format backup files where # This is to support old format backup files where
# the favourite index is not present. # the favourite index is not present.
set idx 0 set idx 0
} elseif {$idx eq "-"} { } else {
if {$idx eq "-"} {
set idx $lastidx set idx $lastidx
incr inc incr inc
} }
set lastidx $idx set lastidx $idx
incr idx $inc incr idx $inc
}
if {$grp != $group} { if {$grp != $group} {
set grp $group set grp $group