diff --git a/func.sh b/func.sh index 8fdb7da..cc2e469 100755 --- a/func.sh +++ b/func.sh @@ -252,7 +252,7 @@ mendel_readsym_mb() { local mbtail=$(mendel_readsym mb_tail) perl - <<'ENDPERL' -- $val $mbhead $mbtail $i = -1; - @a = qw/eX 4 eY 4 eZ 4 eE 4 eF 4 flags 9 dX 12 dY 4 dZ 4 dE 4 cX 12 cY 4 cZ 4 cE 4 ts 12 c 12 ec 4 n 4/; + @a = qw/eX 4 eY 4 eZ 4 eE 4 eF 4 flags 9 dX 12 dY 4 dZ 4 dE 4 cX 12 cY 4 cZ 4 cE 4 ts 12 c 12 rs 4 sn 4 cm 4 n 4 rs 1/; $c = 0; $c = 1234567; while (length $ARGV[1]) {