parse-wormedit: distinguish newer v95 level strings
[wormy.git] / parse-wormedit
index 42d9d219181a5356d152659203fa007d0c714c7a..84e4e31c0140810983205359b0b05df2d3a54283 100755 (executable)
@@ -262,10 +262,11 @@ sub read {
                        # current @FORMAT
                }
                        $offsetbase = 0xF400;
+               when (96) {}
+                       ref $_ and splice(@$_, -8, 2) for @{ $FORMAT[11] }; # no multifood
+                       splice @FORMAT, 12, 2;  # no reserved byte
                when (95) {}
-                       splice @FORMAT, 6, 2;
-                       ref $_ and splice(@$_, -8, 2) for @{ $FORMAT[9] }; # no multifood
-                       splice @FORMAT, 10, 2;  # no reserved byte
+                       splice @FORMAT, 6, 2;  # no description
                when (94) {}
                when (90) {
                        $FORMAT[5] = 'C/a';  # length-preceding name