--- country-orig.c	Tue Jun 02 17:41:02 2015
+++ country.c	Sat Jan 22 21:46:29 2022
@@ -302,13 +302,13 @@ int country_write(char *fname, struct co
   filebuff[filesize++] = LSB(c->datesep);    /* date separator LSB */
   filebuff[filesize++] = MSB(c->datesep);    /* date separator MSB */
   filebuff[filesize++] = LSB(c->timesep);    /* time separator LSB */
   filebuff[filesize++] = MSB(c->timesep);    /* time separator MSB */
   filebuff[filesize] = c->currencydecsym; /* currency format (bit 2) */
-  filebuff[filesize] <<= 8;
+  filebuff[filesize] <<= 2;
   filebuff[filesize] |= c->currencyspace; /* currency format (bit 1) */
-  filebuff[filesize] <<= 8;
+  filebuff[filesize] <<= 1;
   filebuff[filesize++] |= c->currencypos; /* currency format (bit 0) */
   filebuff[filesize++] = c->currencyprec; /* currency precision */
   filebuff[filesize++] = c->timefmt;      /* time format */
 
   /* write the UCASE subfunction (used for LCASE, too) */