| … | |
… | |
| 85 | |
85 | |
| 86 | # force some mandatory protocol options, most of these |
86 | # force some mandatory protocol options, most of these |
| 87 | # are for obsolete clients only |
87 | # are for obsolete clients only |
| 88 | # $setup->{darkness} = 1; |
88 | # $setup->{darkness} = 1; |
| 89 | # $setup->{exp64} = 1; |
89 | # $setup->{exp64} = 1; |
| 90 | $setup->{extmap} = 1; |
90 | $setup->{extmap} = 1 if exists $setup->{extmap}; |
| 91 | # $setup->{facecache} = 1; |
91 | # $setup->{facecache} = 1; |
| 92 | $setup->{fxix} = 3; |
92 | $setup->{fxix} = 3 if exists $setup->{fxix}; |
| 93 | $setup->{map1acmd} = 1; |
93 | $setup->{map1acmd} = 1 if exists $setup->{map1acmd}; |
| 94 | $setup->{map1cmd} = 0; |
94 | $setup->{map1cmd} = 0 if exists $setup->{map1cmd}; |
| 95 | $setup->{msg} = 1; |
95 | $setup->{msg} = 1 if exists $setup->{msg}; |
| 96 | |
96 | |
| 97 | cf::datalog setup => |
97 | cf::datalog setup => |
| 98 | request => \%orig, |
98 | request => \%orig, |
| 99 | reply => $setup, |
99 | reply => $setup, |
| 100 | ; |
100 | ; |
