a2ps-i18n.patch

   1 --- a2ps-4.15.4/liba2ps/jobs.c.orig     2023-06-11 20:24:17.030458874 +0200
   2 +++ a2ps-4.15.4/liba2ps/jobs.c  2023-06-11 20:25:12.540158152 +0200
   3 @@ -120,6 +120,10 @@ a2ps_job_new (void)
   4    setlocale (LC_MESSAGES, "");
   5    setlocale (LC_CTYPE, "");
   6    setlocale (LC_PAPER, "");
   7 +  /* Make sure dot will be used to separate fractional part of numbers.
   8 +   * In some other locales (Polish, for example) comma is used, but this
   9 +   * is violation of PostScript. */
  10 +  setlocale(LC_NUMERIC, "C");
  11
  12    bindtextdomain (PACKAGE, LOCALEDIR);
  13    bindtextdomain (PACKAGE "-gnulib", LOCALEDIR);
  14 --- a2ps-4.15.4.orig/liba2ps/output.c   Tue Aug 31 19:42:41 1999
  15 +++ a2ps-4.15.4/liba2ps/output.c        Sat Jun 23 16:45:11 2001
  16 @@ -619,9 +619,17 @@
  17  {
  18    /* Open the destination */
  19    a2ps_open_output_stream (job);
  20 +
  21 +  /* Make sure dot will be used to separate fractional part of numbers.
  22 +   * In some other locales (Polish, for example) comma is used, but this
  23 +   * is violation of PostScript. */
  24 +  setlocale(LC_NUMERIC, "C");
  25
  26    /* Dump the PostScript and close */
  27    output_dump (job->divertion, job->output_stream->fp);
  28 +
  29 +  /* Restore locale */
  30 +  setlocale(LC_NUMERIC, "");
  31
  32    /* We have to close stdout to avoid hanging up of pipes */
  33    /* Note: some day, I should learn about the signals, and be able